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THE NCV11 DIAGNOSTIC PROGRAM IS A SERIES OF TESTS DESIGNED 

TO TEST ALL _ LOGIC FUNCTIONS AND DATA PATHS ACCESSIBLE ON THE 
M8026 AND M8036. THE M7952 DIAGNOSTIC SHOULD HAVE BEEN EXECUTED. 
TOTAL PROGRAM CONTROL IS ACCOMPLISHED THRU THE CONSOLE TERMINAL 
VIA KEYBOARD TEST SELECTION AND THE PROVISIONS OF SECTION 5. 

THE PROGRAM CAN BE EXECUTED ON AN LSI-11 OR PDP-11 COMPUTER. 


2.0 REQUIREMENTS 


2.1 EQUIPMENT 


1. PDP11 FAMILY OR LSI-11 FAMILY COMPUTER 
- I/0 TERMINAL (IE: LA36) 

3. NCV11 OPTION INCLUDING KWV11 REAL TIME CLOCK (M7952) 
- AQ17 SELF-TEST CONNECTOR (70-12894) (REQUIRED FOR SECTION 9.2 + 9.3) 
- 3060 JOYSTICK (OPTIONAL) 

6. HARDWARE TESTER AND PROM BLASTER (OPTIONAL) 


2.2 STORAGE 


THE PROGRAM REQUIRES 16K OF MEMORY. 
IF MEMORY MANAGEMENT OR ADDITIONAL MEMORY ARE SENSED, THE 
PROGRAM WILL USE THOSE HARDWARE OPTIONS. 


2e3 PRELIMINARY PROGRAMS 
THE KWV11 DIAGNOSTIC (MD-11-DVKWA) SHOULD HAVE BEEN RUN. 
3.0 LOADING PROCEDURE 


NORMAL PROCEDURE FOR LOADING A BINARY PROGRAM INTO MEMORY 
SHOULD BE FOLLOWED. 


4.0 STARTING PROCEDURE 


1. MAKE SURE THE NCV11 DEVICE BUS ADDRESS, INTERRUPT VECTOR ON THE 
M8026 AGREE WITH THE DEFAULT VALUES DEFINED IN SECTION 7.1. 
2. MAKE SURE THE NCV11 CLOCK BUS ADDRESS ON THE M7952 AGREE 
WITH THE DEFAULT VALUE DEFINED IN SECTION 7.1. 
3. MAKE SURE THE NCV11 INTERRUPT PRIORITY LEVEL ON THE M8217 
. AGREE WITH THE DEFAULT VALUE DEFINED IN SECTION 7.1. 
4. INSURE THAT THE HALT SWITCH IS DISABLED (IF ANY). 
LSI111: 5. TYPE THE STARTING ADDRESS OF 200 AND THE CHARACTER G. 
6. THE PROGRAM WILL RESPOND BY TYPING THE PROGRAM T!TLE. 
LSI111: 7. THE PROGRAM WILL REQUEST SWITCH REGISTER VALUE. 
8. THE PROGRAM WILL TYPE THE TEST SELECTION MENU FOR THE OPERATOR 
9. THE OPERATOR SELECT'S THE APPROPRIATE TEST BY TYPING THE TEST LETTER AND ‘CR’ 


IF THE PROGRAM IS EXECUTED ON A CPU WITH A SWITCH REGISTER AND THE 
OPERATOR SETS ALL SWITCHES TO A 1, THE SOFTWARE S.R. WILL BE USED. 
IF THE HARDWARE SWITCH REGISTER IS USED, THE SOFTWARE S.R. HAS NO EFFECT. 


PROGRAM START 


STARTING ADDRESS OF THE PROGRAM 

RESTART ADDRESS OF THE PROGRAM 

STARTING ADDRESS FOR THE FACTORY OPTION CHECK-OUT AREA. 
(INFORMS THE PROGRAM THE TESTER AND BLASTER ARE CONNECTED) 


SOFTWARE SWITCH REGISTER 


FUNCTION 


HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 
INHIBIT ITERATIONS 


OR 
LOOP ON TEST IN SWR <7-0> 


FUNCTION 


"INPUT VOLTAGE OUT OF RANGE** ERROR 
ERROR OR CONVERSION TYPEOUT 
CONVERSIONS ON CAMERA #3 GAIN 
CONVERSIONS ON CAMERA #2 GAIN 
CONVERSIONS CAMERA #1 GAIN 
CONVERSIONS ON CAMERA #0 GAIN 
CONVERSIONS ON JOYSTICK 
CONVERSIONS a CAMERA #3 GAIN 

ON 

ON 


CONVERSIONS CAMERA #2 GAIN 
CONVERSIONS CAMERA #1 GAIN 
INHIBIT CONVERSIONS CAMERA #0 GAIN 


THE SOFTWARE SWITCH REGISTER ‘SWREG* (LOC. 176) CAN BE 
CHANGED BY USING THE ODT FACILITIES. 

THE SOFTWARE SWITCH REGISTER CAN BE CHANGED UNDER PROGRAM 
CONTROL BY TYPING THE ‘CONTROL & G* KEYS. THIS 

KEYBOARD OPERATION WILL PRINT THE CURRENT CONTENTS 

AND ACCEPT NEW OCTAL SWITCH REGISTER DATA TERMINATED 
WITH A CARRIAGE RETURN. 

ONCE THE ODT MODE HAS BEEN ae od aa OF AN 

ERROR CONDITION WITH g yA. T ON 


ABOVE IS OF NO VALUE, RESOR 

SOFTWARE SWITCH REGISTER IF DESIRED BEFORE TYPING 

*P* (CONTINUE). 

IF THE PROGRAM IS PERFORMING RESET INSTRUCTIONS, SEVERAL 
"CONTROL & C* OR "CONTROL & G' COMMANDS MAY BE NECESSARY TO 
BE ACKNOWLEDGE “BY THE PROGRAM. 

TESTING CAN BE ABORTED BY TYPING THE ‘CONTROL & C* KEYS. 





ERROR REPORT ING 


ALL ERRORS ARE ACCOMPANIED WITH AN ENGLISH LANGUAGE DESCRIPTIVE 
COMMENT AS TO THE TYPE OF FAILURE. FURTHER QUALIFICATION OF 

THE ERROR CAN BE O8TAINED IF NEEDED FROM THE COMMENT AT THE 
ERROR PC OR FROM THE TEST ITSELF. 


MISCELLANEOUS 


NCV11 BUS ADDRESS MODIFICATION 


MODIFY LOCATION ‘"SBASE" (LOC. 1250) IF BASE NCV11 BUS ADDRESS IS NOT 772760. 
MODIFY THE LOW NINE BIYS OF LOCATION ‘*$VECT1"* (LOC. 1244) IF 

BASE NCV11 INTERRUPT VECTOR IS NOT 370. 

MODIFY THE HIGH THREE BITS OF LOCATION ‘$VECT1" (LOC. ee IF 

THE INTERRUPT PRIORITY LEVEL IS NOT LEVEL 6 ON A UNIBUS CPU 

MODIFY LOCATION '$CDW1' (LOC. 1254) IF BASE NCV11 CLOCK BUS ADDRESS IS NOT 770420. 


XXDP/APT NOTES 


THIS DIAGNOSTIC IS CHAINABLE UNDER XXDP (REQUIRES 16K OR MORE). 
IF RUNNING UNDER XXDP/ACT/APT, THE LOGIC AND DIFLIN TESTS WILL BE RUN. 


POWER FAIL 
A POWER FAILURE WILL CAUSE A RESTART MESSAGE ON POWER UP AT 


WHICH TIME THE PROGRAM IS RESTARTED (ONLY ON SYSTEMS WITH 
NON-VOLATILE MEMORY AND WITH APPROPRIATE HARDWARE). 


MULTIPLE NCV11°S INTERFACE TESTING 


THIS PROGRAM DOES NOT ‘‘AUTO-SIZE'' THE NUMBER OF NCV11°S CONNECTED. 
FOR EACH ADDITIONAL NCV11, THE OPERATOR MUST MODIFY LOCATIONS 
$SBASE, SVECT1 AND $CDW1 (REF. 7.1). 


RESTRICTIONS 


KWV11 REAL TIME CLOCK (M7952) MUST NOT BE CONNECTED TO M8C26 *FAST-ON'' TABS. 
UNLESS OTHERWISE STATED, NO EXTERNAL CONNECTIONS TO M8036 OR AO17. 





G 1 
ADDRESS MAKER TABLE 


THE M8036 CONTAINS LOGIC TO CONVERT A/D DATA INTO A RELATIVE 
ADDRESS. BELOW IS A TABLE WHICH SHOWS THE ADDRESS MAKER OUTPUT 
WITH THE "TEST CONTROL’’ MAINT. BIT SET. SETTING THIS BIT ENABLES 
THE STATES OF THE ‘GAIN, ZB ENABLE AND RESOLUTION'’ BITS SIMULATE 
THE CONVERTED A/D DATA. 


RESOLUTION DRESS MAKER OUTPUT BITS 
RESO RES WORD*16 15 14 5 12 11 10 09 08 07 06 05 04 03 02 01 90 


lolelelelele)::) 
OOCOOOCOWTON 
AaNONaA-— 


ALWAYS A 0 

ALWAYS A 1 

GAIN FLOP STATE 

ZB ENABLE FLOP STATE 

THE "'AND'' OF ZB ENABLE WITH ZB MAINT. INPUT 


DWNOD$O DO0O-—-— 


EXECUTION TIME 


EXECUTION TIME RANGES FROM ABOUT 5 SECONDS WITH NO ITERATIONS 


TO ABOUT 70 SECONDS WITH ITERATIONS ENABLED. 
AN END PASS MESSAGE INDICATES ALL SUB-TESTS HAVE COMPLETED. 
“ ADDITIONAL 4K OF MEMORY WILL ADD ABOUT 10 SECONDS 
THE LOGIC TEST RUNTIME. 
DIFFERENTIAL LINEARITY: EXECUTION TIME IS ABOUT 90 SECONDS. 





aon 


9.0 


9.2 


9.3 


PROGRAM TEST DESCRIPTIONS 


THE PROGRAM CONSISTS OF FOUR MAIN SECTIONS PLUS THREE AUXILIARY AND 
THREE FACTORY OPTION CHECK-OUT SECTIONS. 

THE OPERATOR SELECTS EACH SECTION VIA THE CONSOLE KEYBOARD. 

BELOW IS A BRIEF DESCRIPTION OF EACH SECTION AND THE KEYBOARD CHARACTER. 


MAIN SECTIONS 


-. LOGIC TEST (M8026 + M8036) 
<NO INTERVENTION> <SETUP ONLY IF SA=210> 
THE TEST CONTAINS A SERIES OF INDEPENDENT SUB-TESTS DESIGNED 


AT THE BEGINNING OF THE LISTING. THE COMMENT FIELD WITHIN 

EACH SUB-TEST TITLE CAN BE BENEFICIAL TO UNDERSTANDING THE LOGIC TESTED. 
ADDITIONAL LOGIC TESTS OF THE AO17 WILL BE EXECUTED IF THE 

PROGRAM WAS STARTED AT LOC. 210. 


D (M) DIFFERENTIAL LINEARITY (AQ17) 


<REQUIRES SELF~TEST CONNECTOR IN J1 ON THE AOQ17> <SETUP INTERVENTION ONLY> 
<A017 SWITCH SET TO *MAINT.** POSITION> 


A FINITE VARIATION OF INPUT VOLTAGE EQUALS A GIVEN CONVERTED 

VALUE OR STATE. THE TEST IS TO VERIFY THE WIDTH OF EACH POSSIBLE 
STATE. AN INPUT VOLTAGE IS RAMPED AND THE NCV11 SAMPLES THE RESULT. 
THE NCV11 INCREMENTS THE RESPECTIVE MEMORY LOCATION CORRESPONDING 
TO THE INPUT VALUE. THE PROGRAM THEN DETERMINES IF ANY STATE HAS 
BEEN SKIPPED, IS EXCESSIVELY WIDE OR NARROW. WHEN ‘M’’ IS USED TO 
SELECT THE SECTION, THE PROGRAM OUTPUT AN EXPANDED REPORT OF 

THE 254. STATES. TIGHTER ERROR TOLERANCES ARE USED IF RUNNING 

IN THE OPTION CHECKOUT AREA (SA 210). 


F FINAL ACCEPTANCE 


<REQUIRES SELF-TEST CONNECTOR IN J1 ON THE AQ17> <SETUP INTERVENTION ONLY> 
<A017 SWITCH SET TO *MAINT.’' POSITION> 


THE SUB-SECTION RUNS SECTION ‘L’’ AND ‘'D'' TO VERIFY PROPER OPERATION. 


SEQ 0007 


On 


“ ADJUSTMENT OF AO17 AT FIELD SITE 


<MANUAL INTERVENTION> <SETUP INTERVENTION> 
<AO17 SWITCH SET TO ‘OPER.** POSITION> 


COARSE ADJUSTMENT 9T THE AO17 CAN BE PERFORMED USING THIS SUB-SECTION. 
THE OPERATOR MAY SELECT THE CAMERA AND GAIN TO BE SAMPLED USING THE 
SWITCH REGISTER. A SERIES OF CONVERSIONS ARE TAKEN ON EACH CAMERA 
AND THE OPERATOR IS INFORMED OF THE RESULTS. 


SWITCH FUNCTION 


HALT ON ‘‘INPUT VOLTAGE OUT OF RANGE‘* ERROR 
INHIBIT ERROR OR CONVERTED VALUE TYPE-OUT 
INHIBIT CONVERSIONS ON CAMERA #3 GAIN = 1 
INHIBIT CONVERSIONS CAMERA #2 GAIN 
INHIBIT CONVERSIONS CAMERA #1 GAIN 
INHIBIT CONVERSIONS CAMERA #0 GAIN 
INHIBIT CONVERSIONS JOYSTICK 
INHIBIT CONVERSIONS 
INHIBIT CONVERSIONS 
INHIBIT CONVERSIONS 

000001 INHIBIT CONVERSIONS CAMERA #0 GAIN 


AUXILIARY SECTION 


0 OTHER TERMINAL ADDRESS 
IN SOME CUSTOMER SITES, THE CONSOLE TERMINAL MAY NOT BE LOCATED 
WITHIN EASY ACCESS TO THE NCV11. THIS SECTION ALLOWS THE OPERATOR 
TO CHANGE THE PROGRAMS CONTROL TO ANOTHER TERMINAL. 
H HELP THE OPERATOR 
A LIST OF THE COMMANDS WILL BE TYPED TO REFRESH THE OPERATOR'S MEMORY. 
S SOFTWARE SWITCH REGISTER 
ENABLES THE OPERATOR TO CHANGE THE SOFTWARE SWITCH REGISTER WHEN 
NOT RUNNING ANOTHER SUB-SECTION. 
FACTORY OPTION CHECK-OUT SECTION 


I INITIAL ADJUSTMENT OF A017 


<MANUAL INTERVENTION> <SETUP INTERVENTION> <HARDWARE TESTER> 
<A017 SWITCH SET TO *OPER."’ POSITION> 


A KNOWN GOOD DIGITAL TO ANALOG (D/A) SUPPLIES A REFERENCE INPUT 
VOLTAGE. THE OPERATOR IS INFORMED WHICH ADJUSTMENT TO PERFORM. 

THE PURPOSE OF THE TEST IS TO VERIFY THAT THE ADJUSTMENT TO THE PRE-AMP 
SECTION CAN BE PREFORMED. THE TEST DOES NOT ATTEMPT TO CALIBRATE 

THE PRE-AMP, BUT ONLY TO FUNCTIONALLY VERIFY THE ADJUSTMENTS. 





9.9 


10.0 


B BLASTING THE LINEARITY CORRECTION PROM 


<MANUAL INTERVENTION> <SETUP INTERVENTION> <HARDWARE TESTER> 
<A017 SWITCH SET TO *MAINT."* POSITION> 


THE TEST IS DESIGNED TO CREATE THE LINEARITY CORRECTION PROM (LCP). 

THE TESTER HARDWARE CONTAINS RAM STORAGE TO EMULATE THE LCP. THE ' 
PROGRAM WILL RUN DIFFERENTIAL LINEARITY. THE PROGRAM WILL THEN ' 
USE THE RESULTS TO DETERMINE THE CORRECT VALUE TO BE PLACED IN THE 

LCP HE PROGRAM WILL THEN INFORM THE PROM BLASTER TO GENERATE A 

CORRECTED LINEARITY PROM FOR THE AQ17 MODULE. UPON COMPLETION 

OF GENERATION AND VERIFICATION STAGE, THE OPERATOR IS INSTRUCTED 

TO REMOVE THE EMULATOR CABLE FROM THE AO17 AND INSERT THE NEWLY 

CREATED LCP. THE PROGRAM WILL RE-EXECUTE DIFFERENTIAL LINEARITY. 


SEQ 0009 


C CONTROL PROGRAM PROM 
<MANUAL INTERVENTION> <SETUP INTERVENTION> <HARDWARE TESTER> 
THE ROUTINE WILL CREATE THE M8036 CONTROL PROM. THE OPERATOR 


MAY CREATE SEVERAL COPIES BY REPEATELY EXECUTING THIS SECTION. 
THE PROGRAM WILL INFORM THE OPERATOR THE STEPS TO PERFORM. 


LOCATION OCTAL BINARY 

215 10001101 
01 244 10100100 
02 116 01001110 
03 144 01100100 
04 215 10001101 
05 244 10100100 

116 01001110 
07 144 01100100 
10 215 10001101 
11 244 10100100 
12 116 01001110 
13 144 01100100 
14 215 10001101 
15 244 10100100 
16 116 01001110 
17 144 01100100 
20 116 01001110 
21 144 01100100 
22 216 10001110 
23 244 10100100 

LISTING 
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CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG-78 15:05 
CZNCCA.P11 TABLE OF CONTENTS SEQ 0010 


BASIC DEFINITIONS 

MEMORY MANAGEMENT DEFINITIONS 
OPERATIONAL SWITCH SETTINGS 

TRAP CATCHER 

STARTING ADDRESS(ES) 

ACT11 HOOKS 

APT PARAMETER BLOCK 

COMMON TAGS 

APT MAILBOX~ETABLE 

ERROR POINTER TABLE 

INITIALIZE THE COMMON TAGS 

TYPE PROGRAM NAME 

GET VALUE FOR SOFTWARE SWITCH REGISTER 
PRIME THE NCV11 ADDRESSES FROM THE DEFAULT VALUES 
DIAGNOSTIC IDENTIFICATION TYPEOUT 
KEYBOARD COMMAND DECODER 


DESCRIPTION 


VERIFY THE 8 NCV11 AND 2 NCV11 CLOCK BUS ADDRESSES RESPOND 
FLOAT A 1 ACROSS 10 BITS OF THE COMMAND/STATUS REG. 
VERIFY THAT ‘‘INIT’’ CLEARS THE CSR REGISTE 


VERIFY THAT CLEARING HIGH BYTE OF SFR DOES NOT CLEAR LOW BYTE 
VERIFY THAT ““INIT’’ CLEARS THE SFR REGISTER 

VERIFY THAT “‘CLEAR ALL** CLEARS THE SFR REGISTER 

FLOAT A 1 ACROSS THE WORD COUNT REGISTER 

FLOAT A 1 ACROSS THE BUS ADDRESS os 


ECTION 
Y “CLR ALL ARS THE EXTENDED OFFSET BITS 
TEST THE ‘‘ACTIVE’’ FLOP CAN SET AND CLEAR 


VERIFY Z INPUTS CAUSE THE LOW 8 BITS OF 32 BIT COUNTER TO CHANGEIN MATRIX MODE 
VERIFY Z INPUTS CAUSE THE LOW 16 BITS OF 32 BIT COUNTER TO CHANGE 


TEST THAT ‘WCA OVFL’’ SETS Z/WC OVERFLOW FLOP AND ‘CLR ALL’* CLEARS IT 
TEST THAT ‘“WCA OVFL** SETS Z/WC OVERFLOW FLOP AND ‘'CLR WC OVFL** CLEARS IT 
TEST THAT ‘WCA OVFL*’ GENERATES AN INTERRUPT 

VERIFY “WCA OVFL** CLEARS *‘ACTIVE’’ 


VERIFY JOYSTICK DONE FLOP SETS 

VERIFY THAT “RESET’’ INSTRUCTION CLEARS THE JOY READY FLOP 
JOYSTICK DATA PATH GAIN =0 7B ENABLE =0 RES. = 000 
JOYSTICK DATA PATH 1 

JOYSTICK DATA PATH 

JOYSTICK DATA PATH 

JOYSTICK DATA PATH 

JOYSTICK DATA PATH 
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TABLE OF CONTENTS 


T41 VERIFY THE DATA INCREMENT FUNCTION 

T42 VERIFY THE DATA INCREMENT CARRY BIT 

143 VERIFY THE DATA INCREMENT FUNCTION IS INHIBITED 
T44 VERIFY THE DATA DECREMENT FUNCTION 

T45 VERIFY THE DATA DECREMENT BORROW 

T46 VERIFY THE DATA DECREMENT FUNCTION IS isa P GA 


147 TEST ADDRESS MAKER = MATRIX MODE - RES = = 0 7B ENABLE = 0 
T50 TEST ADDRESS MAKER = MATRIX MODE = RES = 7 GAIN = 1 ZB ENABLE = 0 
T51 TEST ADDRESS MAKER = MATRIX MODE - RES = 7 GAIN = 0 ZB ENABLE = 1 
T52 TEST ADDRESS MAKER = MATRIX MODE - RES = 6 GAIN = 0 ZB ENABLE = 0 
T53 TEST ADDRESS MAKER - MATRIX MODE - RES = 6 GAIN = 1 ZB ENABLE = 0 
754 TEST ADDRESS MAKER - MATRIX MODE - RES = 6 GAIN = 0 ZB ENABLE = 1 
T55 TEST ADDRESS MAKER - MATRIX MODE - RES = 5 GAIN = 0 ZB ENABLE = 0 
756 TEST ADDRESS MAKER = MATRIX MODE - RES = 5 GAIN = 1 ZB ENABLE = 0 
157 TEST ADDRESS MAKER = MATRIX MODE - RES = 5 GAIN = 0 ZB ENABLE = 1 
T60 TEST ADDRESS MAKER - MATRIX MODE - RES = 4 GAIN = 0 ZB ENABLE = 0 
T61 TEST ADDRESS MAKER = MATRIX MODE - RES = 4 GAIN = 1 ZB ENABLE = 0 
T62 TEST ADDRESS MAKER - MATRIX MODE - RES = 4 GAIN = 0 ZB ENABLE = 1 
T63 TEST ADDRESS MAKER - MATRIX MODE - RES = 3 GAIN = 0 ZB ENABLE = 0 
T64 TEST ADDRESS MAKER - MATRIX MODE - RES = 3 GAIN = 1 ZB ENABLE = 0 
T65 TEST ADDRESS MAKER - MATRIX MODE - RES = 3 GAIN = 0 ZB ENABLE = 1 
T66 TEST ADDRESS MAKER - MATRIX MODE - RES = 2 GAIN = 0 ZB ENABLE = 0 
167 TEST ADDRESS MAKER - MATRIX MODE - RES = 2 GAIN = 1 ZB ENABLE = 0 
T70 TEST ADDRESS MAKER - MATRIX MODE - RES = 2 GAIN = 0 ZB ENABLE = 1 
171 TEST ADDRESS MAKER - MATRIX MODE - RES = 1 GAIN = 0 ZB ENABLE = 0 
172 TEST ADDRESS MAKER - MATRIX MODE - RES = 1 GAIN = 1 ZB ENABLE = 0 
173 TEST ADDRESS MAKER - MATRIX MODE - RES = 1 GAIN = 0 ZB ENABLE = 1 
174 TEST ADDRESS MAKER =- LIST MODE - ZB ENABLE = 0 GAIN = 0 

T75 TEST ADDRESS MAKER - LIST MODE - 7B ENABLE = 1 GAIN = 0 

176 TEST ADDRESS MAKER - LIST MODE - ZB ENABLE = 0 GAIN = 1 

177 ENABLE A ONE WORD TRANSFER SECTION LIST MODE 

T100 ENABLE A A SID WORD TRANSFER SECTION LIST MODE 


7101 VERIFY **TIMEOUT’’ FLOP SETS AND ‘‘CLR ALL" CLEARS IT 

T7102 VERIFY TIMEOUT" FLOP SETS AND ‘CLR TIMEOUT’’ CLEARS IT 

7103 VERIFY **TIMEOUT’’ INTERRUPT 

7104 VERIFY INCREMENTING INTO EXTENDED ADDRESS BIT 16 

T105 VERIFY INCREMENTING INTO EXTENDED ADDRESS BIT 17 

7106 VERIFY *‘SET EVENT’* DATA GENERATES A 177777 ery WORD 

7107 VERIFY ‘‘SET TIME’ DATA GENERATES A 000000 DATA WORD 

7110 VERIFY *‘CLOCK ST1°* GENERATES A EVENT (177779) DATA WORD 

1111 VERIFY *‘CLOCK OVERFLOW'* GENERATES A TIME (000000) DATA WORD 

T112 VERIFY *‘SET TIME’* OVERRIDES *‘SET EVENT’* DATA 

7113 DO A ONE WORD MATRIX MODE TRANSFER git FOR INCREMENT FUNCTION 
7114 VERIFY EACH BIT OF THE INCREMENT REG. DATA P. 

1115 CHECK FOR LOW BYTE “*INC OVFL’* TO SET CELL OVERFLOW AND *'CLR CELL** TO CLEAR IT 
1116 CHECK FOR WORD *‘INC OVFL*' TO SET CELL OVERFLOW AND ‘'CLR ALL’’ TO CLEAR IT 
1117 CHECK FOR ‘CELL OVERFLOW’ INTERRUPT 

T120 VERIFY CORRECT BR LEVEL THE NCV~-11 


7121 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 13 
T122 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 12 
7123 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 11 


SEQ 0011 
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VERIFY 
VERIFY 
VERIFY 
VERIFY 
VERIFY 
VERIFY 
VERIFY 
VERIFY 
VERIFY 


WORD MATRIX OFFSET 


>PYrrrrrrr> 
st os os ts ts 


WORD MATRIX OF FSET 


VERIFY ADM INPUT TO THE MATRIX MUX. USING GAIN ENABL 
VERIFY ADM INPUT TO THE MATRIX MUX. rt USING ZB ENABLE 


VERIFY BYTE OPERATION OF THE ‘‘TESTX'' FLOP 
VERIFY 12 ADDER INPUT TO MATRIX MODE MUX 
VERIFY 13 ADDER INPUT TO MATRIX MODE MUX 
VERIFY BIT 14 ADDER INPUT TO MATRIX MODE MUX 
CHECK FOR HIGH BYTE “INC OVFL** TO SET CELL OVERFL 
VERIFY EACH BIT OF THE LOWER 16 BIT Z COUNTER 
VERIFY EACH BIT OF THE HIGHER 16 BIT Z COUNTER 
VERIFY THAT CAMERA 01 CHANNEL IS OPERATIONAL 
VERIFY THAT CAMERA 10 CHANNEL IS OPERATIONAL 
VERIFY THAT CAMERA 11 CHANNEL IS OPERATIONAL 
DYNAMIC MATRIX MODE ADDRESS 

DYNAMIC LIST MODE ADDRESS 


DYNAMIC LIST MODE TRANSFER - MAXIMUM BUFFER LENGTH IN LOWER 28K 


LE 


(TESTER ONL Y) 
(TESTER ONLY) 
(TESTER ONLY) 
(TESTER ONLY) 
(TESTER ONLY) 


ONE MATRIX DATA TRANSFER TO EACH 4K EXTENDED MEMORY 
ONE LIST DATA TRANSFER TO EACH 4K EXTENDED MEMORY 


VERIFY BIT 15 MATRIX ADDER INPUT 
VERIFY HIGH BYTE OPERATION OF THE ‘‘TEST X 
VERIFY BIT 16 INPUT TO THE MATRIX ore ADDER 
DETERMINE IF DIFLIN IS TO BE RUN ( 

END OF PASS ROUTINE 

ERROR ASCII MESSAGES 

TTY INPUT ROUTINE 

READ AN OCTAL NUMBER FROM THE TTY 

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

SCOPE HANDLER ROUTINE 

TYPE ROUTINE 

BINARY TO OCTAL (ASCII) AND TYPE 

ERROR HANDLER ROUTINE 

ERROR MESSAGE TYPEOUT ROUTINE 

APT COMMUNICATIONS ROUTINE 

POWER DOWN AND UP ROUTINES 

ROUTINE TO SIZE MEMORY 

SAVE AND RESTORE RO-R5 ROUTINES 

INTEGER MULTIPLY ROUTINE 

INTEGER DIVIDE ROUTINE 

DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE 

SINGLE LENGTH BINARY TO DECIMAL ASCIZ ROUTINE 

TRAP DECODER 

TRAP TABLE 

A TO D FIELD SITE AND ADJUSTMENT LOOP 


SEQ 0012 
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SEQ 0013 


-LIST ME 
-NLIST MD,MC, a” 


ENABL 
i sun=167400 
-SCATCH, SCMTAG, LSTYPE, . SEOP, .EQUAT, .HEADER, . SERROR, .$TYPOCT 
. $P. “$POWER , .SREAD, . $SAVE, . $SCOPE , . SETUP, $SPACE..$SWDOC, .STYPE,.$TRA 
“ SWRHI. .SERRTYP,.$TYPDS, -STYPBIN, SOF TSWR, . $CKSWR 
.$RDOCT..$SIZE,.KT11, .SDIV,.SMULT, . SSAVE ,.$SB2D, . $DB2D 
- TITLE ZNCCA NCV11 DIAGNOSTIC 
z*COPYRIGHT (C) 1978 
7*DIGITAL EQUIPMENT CORP. 
5 SAVARD, MASS. 01754 , 


! sPROGRAM BY RAYMOND SHOOP 


< ATHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
5s PARAS (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 


‘SBT TL BASIC DEFINITIONS 


;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *#* 
STACK= 1100 

-EQUIV EMT, ERROR 7 ;BASIC DEFINITION OF ERROR CALL 
-EQUIV JOT,;SCOPE : 3;BASIC DEFINITION OF SCOPE CALL 


; *MISCELLANEOUS DEF INI TIONS 
HT= 11 ODE FOR HORIZONTAL TAB 


;CODE FOR LINE FEED 
CODE FOR CARRIAGE RETURN 
:; CODE FOR CARRIAGE RETURN-LINE FEED 
;;PROCESSOR STATUS WORD 


7zSTACK LIMIT REGISTER 
;:PROGRAM INTERRUPT REQUEST REGISTER 
7 ;HARDWARE SWITCH REGISTER 

177570 7 ;HARDWARE DISPLAY REGISTER 


; *GENERAL PURPOSE REGISTER DEF INITIONS 
RO= x0 NERAL REGISTER 
R1= ; ; GENE REGISTER 
R2= ‘3 REGISTER 
R3= 3 REGISTER 
R4= -* 

R5= 
R6= 
R7= 
SP= 
PC= 


:*PRIORITY LEVEL DEFINITIONS 
PRO= 0 szPRIORITY L 
PR1= 40 7 PRIORITY L 


SAMA 





CZ 
C2 
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CZNCCA.°11 BASIC DEFINITIONS SEQ 0014 
55 000100 PR2= 100 s PRIORITY LEVEL 2 
56 000140 PR3= 140 >;PRIORITY LEVEL 3 
57 000200 PR4= 200 szPRIORITY LEVEL 4 
58 000240 PR5= 240 s:PRIORITY LEVEL 5 
59 000300 PR6= 300 szPRIORITY LEVEL 6 
rs 000340 PR7= 340 s PRIORITY LEVEL 7 
62 3*" "SWITCH REGISTER’’ SWITCH DEFINITIONS 
63 100000 Sw15= 100000 

0 Sw14= 40000 

65 020000 Sw13= 20000 

66 0000 Swi2= 10000 

67 004000 Swi1l= 400 
02000 swi0= 2000 

69 001000 swo9= 1000 

70 000400 SwOo8= 400 

71 000200 SwO7= 200 

72 000100 Sw06= 100 

73 000040 Swos= 40 

74 000020 Sw04= 20 

75 000010 Swo3= 10 

% 004 SwO2= 4 

77 000002 Swol= 2 

78 001 sw00= 1 

79 -EQUIV SWO09,SW9 

80 EQUIV SW08,SW8 

81 EQUIV §S SW 

82 EQUIV SW06,S 

83 EQUIV SW05,SW5 

84 -EQUIV SW04,SW4 

85 EQUIV SW03,SW3 

86 EQUIV SW02,SW2 

87 EQUIV SW01,SW1 

4 -EQUIV SWO0,S 

90 :*DATA BIT DEFINITIONS (BITOO TO BIT15) 

91 100000 BIT15= 100000 

92 040000 BIT14= 40000 

93 020000 BIT13= 20000 
010000 BIT12= 10000 

95 004000 BIT11= 4000 

96 002000 BIT10= 2000 

97 001000 BITO9= 1000 

98 000400 BITO8= 400 
000200 BITO7= 200 

100 100 BITO6= 100 

101 000040 BITOS= 40 

102 20 BIT04= 20 

103 000010 BITO3= 10 
000004 BITO2= 4 

105 000002 BITO1= 2 

106 001 BITOO= 1 

107 -EQUIV BITO9,BIT9 


108 -EQUIV BIT08,BIT8 


CZNCCA NCV11 


CZNCCA.P11 


salh ail wid alld anil sal cilicall cath oe 
DNA WU=ODS 


me ee a ed ad od wd od = 


mu- 
=-—30 


er | 
MMMM 
CONQAUIS WI 


DIA 


00 
000240 
000250 


177572 
177574 
177576 
172516 


177600 


177616 


177620 


177632 


GNOSTI MACY11 27(654) 
BASIC DEFINITIONS 


Toute 


EQUIV 


8-AUG-78 


B1T07,BIT7 


B1T01,BI1T1 
B1T00,B1T0 


. «= 
15:05 PAGE 3 


;*BASIC ‘‘CPU’’ TRAP VECTOR ADDRESSES 


ERRVEC= 4 

RESVEC= 10 
TBITVEC=14 
TRTIVEC= 14 
BPTVEC= 14 
IOTVEC= 20 
PWRVEC= 24 
EMTVEC= 30 
TRAPVE C=34 


PIRQVEC= 


240 


33TIME OUT AND OTHER ERRORS 
San AND ILLEGAL INSTRUCTIONS 


33; TRACE T 
BREAKPOINT TRAP (BPT) 
32; INPUT/OUTPUT TRAP (IOT) **SCOPE** 
3;POWER FAIL 
ys TRAP (EMT) **ERROR** 
3"'TRAP’* TRAP 
STTY KEYBOARD VECTOR 
TTY PRINTER VECTOR 
PROGRAM INTERRUPT REQUEST VECTOR 


-SBTTL MEMORY MANAGEMENT’ "DEFINITIONS 


:*KT11 VECTOR ADDRESS 


MMVEC= 


250 


3*KT11 STATUS REGISTER ADDRESSES 


UIPDRO= 


UIPDR7= 


; *USER 


UDPDRO= 
UDPDR1= 
UDPDR2= 
UDPDR3= 
UDPDR4= 
UDPDR5= 


177572 


172516 


177600 


177616 
"D'' PAGE DESCRIPTOR REGISTORS 


177620 


177632 


“;*USER ‘'I'’ PAGE DESCRIPTOR REGISTERS 


SEQ 0015 


C2 @ 
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CZNCCA.P11 MEMORY MANAGEMENT DEFINITIONS ; 


177634 UDPDR6= 177634 
177636 UDPDR7= 177636 


;*USER ‘'I'' PAGE ADDRESS REGISTERS 
UIPARO= 177640 4 


SEQ 0016 


UIPAR7= 177656 
;*USER 'D'' PAGE ADDRESS REGISTERS 
UDPARO= 177660 ; 
UDPAR1= 
UDPAR2= 
UDPAR3= 
UDPAR4= 
UDPARS= 
UDPAR6= 
177676 UDPAR7= 177676 
;*SUPERVISOR "'I'' PAGE DESCRIPTOR REGISTERS 


172200 SIPDRO= 172200 


172216 SIPDR7= 172216 
;*SUPERVISOR 'D’' PAGE DESCRIPTOR REGISTERS 
172220 SDPDRO= 172220 


SDPDR7= 172236 
;*SUPERVISOR '‘I'' PAGE ADDRESS REGISTERS 
SIPARO= 172240 


172250 SIPAR4= 172250 





CZNCCA NCV11 
CZNCCA.P11 


;*SUPERVISOR 'D'' PAGE ADDRESS REGISTERS 


;*KERNEL “‘I"' PAGE DESCRIPTOR REGISTERS 


;*KERNEL ‘"D'' PAGE DESCRIPTOR REGISTERS 


;*KERNEL *‘I'' PAGE ADDRESS REGISTERS 


;*KERNEL *'D'' PAGE ADDRESS REGISTERS 


DIAGNOSTIC MACY11 27(654) 8=AUG-78 
MEMORY MANAGEMENT DEF INITIONS 
172252 SIPARS= 172252 
172254 SIPAR6= 172254 
172256 SIPAR7= 172256 
172260 SDPARO= 172260 
172262 SDPAR1= 172262 
172264 SDPAR2= 172264 
172266 SDPAR3= 172266 
172270 SDPAR4= 172270 
172272 SDPARS= 172272 
172274 SDPAR6= 172274 
172276 SDPAR7= 172276 
172300 KIPDRO= 172300 
172302 KIPDR1= 172302 
172304 KIPDR2= 172304 
72306 KIPDR3= 172306 
172310 KIPDR4= 172310 
172312 KIPDR5= 172312 
172314 KIPDR6= 172314 
172316 KIPDR7= 172316 
172320 KDPDRO= 172320 
172322 KDPDR1= 172322 
172324 KDPDR2= 172324 
172326 KDPDR3= 172326 
172330 KDPDR4= 172330 
172332 KDPDR5= 172332 
172334 KDPDR6= 172334 
172336 KDPDR7= 172336 
172340 KIPARO= 172340 
172342 KIPAR1= 172342 
172344 KIPAR2= 172344 
172346 KIPAR3= 172346 
172350 KIPAR4= 172350 
172352 KIPAR5S= 172352 
172354 KIPAR6= 172354 
172356 KIPAR7= 172356 
172360 KDPARO= 172360 
172362 KDPAR1= 172362 
172364 KDPAR2= 172364 
172366 KDPAR3= 172366 


. ¢ 
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SEQ 0017 


y 
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172370 KDPAR4= 
KDPAR5S= 
KDPAR6= 
172376 KDPAR7= 


SEQ 0018 


172760 ABASE=172760 3;NCV11 BASE ADDRESS 
140370 AVECT1=140370 “- 3;BR LEVEL 6 VECTOR TO 370 
170420 ACDW1=170420 sNCV11 CLOCK ADDRESS 





ee 
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»SBTTL OPERATIONAL SW: TCH SETTINGS 
SWITCH 


HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT ITERATIONS 

BELL ON ERROR 

LOOP ON ERROR 

LOOP ON TEST IN SWR<7:0> 
* SBTTL TRAP CATCHER 


-=0 
7*ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A ''.+2,HALT"' 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD 0 3sSOFTWARE DISPLAY REGISTER 
SWREG: «WORD 0 33SOFTWARE SWITCH REGISTER 
.SBTTL STARTING ADDRESS(ES) 
002032 JMP @ABEGIN ;;JUMP TO STARTING ADDRESS OF PROGRAM 
002012 JMP RTRT RESTART ADDRESS 
002020 JMP TESTER ;STARTING ADDRESS WHEN IN THE OPTION AREA 


.=100 
000200 000002 104,200,2 7B EVENT SAFE GUARD 


SEQ 0019 





mn 


CZNCCA 


NCV11 


CZNCCA.P11 


000046 
009052 


000024 
000044 


DIAGNOSTIC 


ACT11 HOOKS 


BP 
MACY11 27(654) 8=AUG-78 15:05 PAGE 8 
SEQ 0020 


.-SBTTL ACT11 HOOKS 


FRA IR ICICI ICICI IOI III II IOI IIIT SOTA TTA IAS AIIASIAASISIIASASAS ASIA. 
;HOOKS REQUIRED BY ACT11 
$SVPC=. SAVE PC 


-=46 
SENDAD 331)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 


«WORD 0 + 22)SET LOC. re TO ZERO 
-=$SVPC zz RESTORE P 


-=1000 
-SBTTL APT PARAMETER BLOCK 


SRR RRR RRR RR K ERE KERR EERE EEK EEK 


=SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
CII RK ERE REE KEKE ERE KEE KEE EKER IKE KEE KEE KEKE EEE ERE 
.$X=.  :; SAVE CURRENT LOCATION 
"=24  ::SET POWER FAIL TO POINT TO START OF PROGRAM 
200 [IFOR APT START UP 
-=44  ::POINT TO APT INDIRECT ADDRESS PNTR. 
$APTHDR ::POINT TO APT HEADER BLOCK 
.=.$X | ::RESET LOCATION COUNTER 
FL RRR EEK KEKE EEE EEE EK EEK KEKE EK EKER EEKEKEEKKEKEEK EE 
:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
SINTERFACE SPEC. 


$SAPTHD: 

$HIBTS: .WORD 0 3;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

$MBADR: .WORD $MAIL ;;ADDRESS OF APT MAILBOX (BITS 0-15) 

$TSTM: .WORD 30 Aare TIM OF LONGEST TEST 

SPASTM: .WORD 10 :RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

$SUNITM: .WORD 30 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
. WORD $ETEND-SHAIL/2 3;LENGTH MAILBOX-E TABLE (WORDS? 


AM 
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-SBTTL COMMON TAGS 


FT ERA ERE EERE 


3*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM. 


SCMTAG: 3sSTART OF COMMON TAGS 
7zCONTAINS THE TEST NUMBER 


ERROR FLAG 
SUBTEST ITERATION COUNT 


oo 


OPE RE 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 
MAX. ERRORS PER TEST 
PC OF LAST ERROR INSTRUCTION 
ADDRESS OF ‘GOOD* DATA 


Nonronoen— = aa a 


; s CONTAIN DATA 
 IRESERVED--NOT TO BE USED 


3 AUTOMATIC MODE INDICATOR 
;z INTERRUPT MODE INDICATOR 


; ADDRESS OF SWITCH REGISTER 
;zADDRESS OF DISPLAY REGISTER 
::TTY KBD STATUS 
7: TTY KBD BUFFER 
zz TTY PRINTER STATUS REG. ADDRESS 
::TTY PRINTER BUFFER REG. ADDRESS 
sz CONTAINS NULL CHARACTER FOR FILLS 
; CONTAINS # OF FILLER Aras | gol ore 
2 ¢ INSERT FILL CHARS. AFTER A ‘LINE 

:"'TERMINAL AVAILABLE'’ FLAG (Bi cb? >ebeVES) 
i [MAX. NUMBER OF ITERATIONS 
000000 : Z2 ESCAPE ON ERROR ADDRESS 
177607 $BELL: .ASCIZ <207><377><377> 3: CODE FOR BELL 

077 i /?/ STION MARK 
015 “e <15> + > CARRIAGE RETURN 

: <12> 7c7LINE FEED 
FERRER EERE ERE REE EEE EEK EKER ERE EKEKKEKEEKKEKEEEKEEREEKE 


-SBTTL APT MAILBOX-ETABLE 


J FREER REE EEE EERE EERE REE KEKEKEEEKEEEEEEEEEKEEREKREK EK 


lelelelelelelelelelel jlolsleleleleloloa) 


DSWR 
DDISP 


7 7APT MAILBOX 
AMSGTY ;;MESSAGE TYPE CODE 
AFATAL ; 
ATESTN 


APASS_ ; S_ COUNT 
SDEVCT: ADEVCT ;;DEVICE COUNT 





aA 
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CZNCCA.P11 APT MAILBOX~E TABLE SEQ 0022 


395 001206 000000 $UNIT: .WORD AUNIT ;;1/0 UNIT NUMBER 
"96 001210 000000 $MSGAD: .WORD AMSGAD ;:MESSAGE ADDRESS 
3y," 001212 000000 $MSGLG: .WORD AMSGLG ::MESSAGE LENGTH 
398 01214 SETABLE : ;APT ENVIRONMENT TABLE 
399 0.214 000 SENV: .BYTE AENV ENVIRONMENT BYTE 
400 001g, 000 SENVM: .BYTE AENVM ;;ENVIRONMENT MODE BITS 
401 001216 OdvuUU $SWREG: .WORD ASWREG ;;APT SWITCH REGISTER 
402 001220 000000 SUSWR: WORD AUSWR USER’ SWITCHES 
403 001222 000000 SCPUOP: .WORD ACPUOP CPU TYPE. OPTIONS 
404 :* BiTs 15-115CPU TYPE 
405 :* 1/04=01 11/0502 ,11/20=03,11/40=04,11/45=05 
406 : 11/70=06.PD0=07,0210 
407 : BIT 10=REAL TIME CLOCK 
408 :* BIT 9=FLOATING POINT PROCESSOR 
409 :* BIT MORY MANAGEMENT 
410 001224 000 $MAMS1: .BYTE AMAMS1 ;;HIGH ADDRESS,M.S. BYTE 
411 001225 000 $MTYP1: :BYTE AMTYP1 ::MEM. TYPE BLKAT 
412 :* MEM.TYPE BYTE =~ (HIGH BYTE) 
413 i* 900 NSEC CORE=00 
414 :* 300 NSEC BIPOLAR=002 
415 :* 500 NSEC MOS= 
416 001226 000000 $MADR1: .WORD AMADR1 ; HIGH ADDRESS BLKA1 z 
417 :* MEM.LAST ADDR.=3 BYTES, THIS WORD AND LOW OF ‘‘TYPE’’ ABOVE 
418 001230 Toy SMAMS2: .BYTE AMAMS2 ;;HIGH ADDRESS,M.S. BYTE 
419 00172; 600 $MTYP2: .BYTE AMTYP2 ;;:MEM.TYPE,BLK#2 
420 yv123. 000000 SMADR2: .WORD AMADR2 ; ;MEM.LAST ADDRESS BLKA2 
“<1 00174 000 SMAMS3: .BYTE  AMAMS3 ;;:HIGH ADDRESS,M.S.BYTE 
422 .00°235 __-000 SMTYP3: BYTE AMTYP3 ;;MEM. TYPE .BLKA3 
423 3.91236 000000 $MADR3: .WORD AMADR3 ;:MEM.LAST ADDRESS.BLK#3 
424 ,001260 000 SMAMS4: .BYTE AMAMS4 ;:HIGH ADDRESS.M.S.BYTE 
| =>" 001241 000 SMTYP4: [BYTE AMTYP4 ;;:MEM.TYPE,BLKAG 
426 001242 R4: .WORD AMADR4 ;;MEM.LAST ADDRESS BLK#4 
427. 001244 140370 SVECT1: .WORD AVECT] 3INTERRUPT VECTOR#1 BUS PRIORITYA#1 
.428 «091246 000000 $VECT2: :WORD AVECT2 :: INTERRUPT VECTOR#2BUS PRIORITYA2 
“429 001250 172760 SBASE: .WORD ABASE ;:BASE ADDRESS OF EQUIPMENT UNDER TEST 
430 001252 000000 $DEVM: .WORD ADEVM ::DEVICE MAP 
431 001254 170420 $CDW1: WORD ACDW1  3:CONTROLLER DESCRIPTION WORDA1 
Rages SMEXIT. 
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CZNCCA.P11 ERROR POINTER TABLE SEQ 0023 C 
tee -SBTTL ERROR POINTER TABLE 
436 z> THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
437 [*,4E INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
438 7*LO°ATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE May a IS PERTINENT. 
439 > *NO)°1: IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS (S$ERRPC). 
at :*NOTR 2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
442 hel EM 3;POINTS TO THE ERROR MESSAGE 
443 s* DH 3;POINTS TO THE DATA HEADER 
444 :* DT 3;sPOINTS TO THE DATA 
tak se DF 3;POINTS TO THE DATA FORMAT 
447 
448 001256 SERRTB: 
449 001256 030220 032500 032730 E.11 ,DH2,DT2,DF0 7M8026 NCV11 TIMEOUT 
450 001264 033002 
451 001266 030260 032500 032730 “EM,‘,DH2,.DT2,DFO 3M8026 COMMAND-STATUS REGISTER ERROR 
452 001274 033002 
453 001276 030324 032500 032730 EMS, DH2,DT2,DF0 3M8026 SPECIAL FUNCTION REGISTER ERROR 
454 001304 033002 
455 001306 030372 032500 032730 EM4, \H2,DT2,DF0 M8026 WORD COUNT REGISTER ERROR 
456 001314 033002 
457 001316 030432 032500 032730 EMS 1 H2,DT2,DFO M8026 BUS ADDRESS REGISTER ERROR 
458 001324 033002 
459 001326 030473 032500 032730 EM6, 1H2,DT2, DFO 7M8026 OFFSET REGISTER ERROR 
460 001334 033002 
461 001336 030527 032500 032730 EM7 DH2,DT2,DFO 7M8026 DUAL REGISTER SELECTION ERROR 
462 001344 033002 
463 001346 030573 032500 032730 EV (0,DH2,.DT2,5F0 3;M8026-M8036 LOW 16 BIT Z COUNT ERROR 
464 001354 033002 
465 001356 030640 032500 032730 2M11,DH2,DT2,D° 9 7M8026-M8036 HIGH 16 BIT Z COUNT ERROR 
466 001364 033002 
467 001366 030706 032500 032730 EM12,DH2,DT2,DFO M8026 2Z COUNT STATUS ERROR 
468 001374 033002 
469 001376 030741 032500 032730 EM13,DH2,DT2,DFO 7M8026 Z COUNT INTERRUPT ERROR 
470 001404 033002 
471 001406 030777 032500 032730 EM14,DH2,DT2,DFO 7M8036 JOYSTICK STATUS ERROR 
472 001414 033002 
473 001416 031033 032500 032730 EM15,DH2,DT2,DFO 7M8036 JOYSTICK DATA ERROR 
474 001424 033002 
475 001426 031065 032500 032730 EM16,DH2,DT2,DFO 3M8036 DATA INCREMENT ERROR 
476 001434 033002 
477 001436 031120 032500 03273J EM17,DH2,DT2,DFO M8036 DATA DECREMENT ERROR 
478 001444 033002 
yrs Spreee Orties 032500 032750 EM20,DH2,DT2,DFO 3M8026-M8036 MATRIX MODE ADDRESS MAKER DATA ERROR 
rr if Breast ose 032500 03; 730 EM21,DH2,DT2,DFO 7M8026 LIST MODE ADDRESS MAKER DATA ERROR 
cc 
rr abs 4 otsnnD 032500 0? 2730 EM22 ,DH2,DT2,DFO 7M8026 LIST MODE TRANSFER BUS ADDRESS ERROR 
485 001476 031360 032500 0 :2730 EM23,DH2,DT2,DFO 7M8026 LIST MODE TRANSFER WORD COUNT ERROR 
486 001504 033002 


487 001506 031432 032500 0. 2730 EM24 ,DH2,DT2,DFO 3M8026 LIST MODE TRANSFER OFFSET ERROR 








CZNCCA 


NCV11 
CZNCCA.P11 


DZ AGNOST 


176510 
176512 
176514 
176516 


172624 


IC 


032500 
032500 
032500 
032500 
032500 
032500 
032524 
032500 
032557 
032500 
032524 
032500 
032465 
032465 
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cRROR POINTER TABLE 


032730 
032730 
032730 
032730 
032730 
032730 
032742 
032730 
032756 
032730 
032742 
032730 
032774 
032722 


SEQ 0024 
EM25 ,DH2,DT2,DF0 3M8026 TIMEOUT STATUS ERROR 
EM26,DH2,DT2,DF0 3M8026 TIMEOUT INTERRUPT ERROR 
EM27 ,DH2,DT2,DFO M8026 SET ‘EVENT'’ OR ''TIME’’ DATA ERROR 
EM30,DH2,DT2,DFO 7M8026 CELL INCREMENT DATA ERROR 
EM31,DH2,DT2,DF0 7M8026 CELL OVERFLOW STATUS ERROR 
EM32,DH2,DT2,DFO 3M8026 CELL OVERFLOW INTERRUPT ERROR 
EM33,DH3,DT3,DFO 3M8026 MATRIX MODE ADDRESS MUX ERROR 
EM34 ,DH2,DT2,DFO 7M8026 =‘'TESTX’* FUNCTION ERROR 
EM35 ,DH4,.DT4,DFO 7M8026 DATA ERROR WHEN TRANSFERING TO EXTENDED MEMORY 
EM36,DH2,DT2,DFO 7M8026 LIST MODE TRANSFER STATUS ERROR 
EM37,DH3,DT3,DFO 3M8026 LIST MODE TRANSFER DATA ERROR 
EM40,DH2,DT2,DFO ; JUMPER-M8026-M7952 ‘EVENT’ OR ‘'TIME’’ MARK ERROR 
EM41,DH1,DT5,DFO 3M7952 CLOCK TIMEOUT 
EM42,DH1,DT1,DFO 7M8217 INTERRUPT LEVEL ERROR 
3;DL11 BLASTER COMM. ADDRESSES (THE OPERATOR MUST CHANGE IF DIFFERENT) 
Dt taBe 176319 INPUT DATA. 
DLODB: | 176516 sUTPUr BATACS 


3VSVO1 ADDRESSES (THE OPERATOR MUST CHANGE IF DIFFERENT) 
TCHAR: 172600 ;CHAR. STATUS 


VICSR: 172620 :MAP STATUS 
VIINT: 172630 


hy ADDRESSES (THE OPERATOR MUST CHANGE IF DIFFERENT) 
DACSR 416 ;KNOWN GOOD D/A STATUS 


DAC3: 176426 
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yKWV11 PROGRAM GENERATED ADDRESSES (THE OPER. ONLY HAS TO CHANGE ‘$CDW1') 
KWCSR: ACDW1 7KWV11 STATUS REGISTER 

KWCSR1: ACDW1+1 zKWV11 STATUS REG. HIGH BYTE 

KWPSR: ACDW1+2 ;KWV11 PRESET REGISTER 


;NCV11 PROGRAM GENERATER ADDRESSES (THE OPER. ONLY HAS TO CHANGE ‘$BASE") 


172771 : ABASE+11 
:NCV11 PROGRAM GENERATED VECTORS (THE OPER. ONLY HAS TO CHANGE LOW 9 BITS OF ‘S$VECT1") 


140370 VECTAO: AVECT1 
VECTA1: AVECT1+#2 
VECTBO: AVECT1+4 
VECTB1: AVECT1+6 


;NCV11 PROGRAM GENERATED BR LEVEL (THE OPER. ONLY HAS TO CHANGE TOP 3 BITS OF “$VECT1") 


BRLEV: 300 ;BR LEVEL 6 


STEMP: O 
CPUDLO: 1 
CPUDL1: 20 


CLRWCO=BIT14 
CLRALL=B1T11 


TESTZ2=BIT1 
REDJOY=BITO 
MORTST=0 DEFINE TO RESTORE TEST CODE 





CZ7NCCA 


NCV11 


CZNCCA.P11 


DIAGNOSTIC 
ERROR POINTER TABLE 


005237 
000611 
005237 
005037 

04 


0004 
005037 
005037 


012737 


013746 


012737 


050116 


050110 
050116 


050116 
050110 


177777 


002250 
000176 
000174 
000004 
001202 
000200 


001216 
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176702 


001140 
001142 


001215 
001140 


SEQ 0026 

RTIRT: INC AGAN ;SET RESTART FLAG 

BR RTRTA 
TESTER: INC WF MODE ;SET FLAG INDICATING OPTION AREA MODE 

CLR AGAN 

BR RTRTA 
BEGIN: CLR AGAN 

CLR WF MODE :CLEAR FLAG INDIC. OPTION TEST AREA MODE 


.SBITL INITIALIZE THE COMMON TAGS 
[:CLEAR THE COMMON TAGS ($CMTAG) AREA 


MOV #SCMTAG,RG :czFIRST LOCATION TO BE CLEARED 
CLR (R6) + 3: CLEAR MEMORY LOCATION 
CMP #SWR,R6 ; ; DONE? 
— -~6 ;;LOOP BACK IF NO 
WSTACK, SP 7; SETUP THE STACK POINTER 


: INITIALIZE A FEW VECTORS 
#SSCOPE ,a# IOTVEC soir VECTOR FOR SCOPE ROUTINE 
mov #340,aMiOTVEC+2 ;:LEVEL 7 
MOV #SERROR ,a#EMT VEC EMT VECTOR FOR ERROR ROUTINE 
MOV #340, aWEMTVEC+2 ;:LEVEL 7 
MOV #STRAP ,@#TRAPVEC ;; TRAP_VECTOR FOR TRAP CALLS 
MOV #340, oye LEVEL 7 
MOV #SPWRDN, a#PWRVEC ; ;POWER FAILURE VECTOR 
MOV #340, a#PWRVEC+2 ct evel 7 
MOV SENDCT, SEOPCT SETUP END-OF -PROGRAM COUNTER 


CLR STIMES SZ INITIALIZE NUMBER OF ITERATIONS 

CLR SESCAPE ae THE ESCAPE ON ERROR ADDRESS 
MOVB #1, SERMAX ; <ALL OW ONE ERROR PER TEST 

MOV #.,SLPADR s INITIALIZE THE LOOP ADDRESS FOR SCOPE 


MOV #. ,SLPERR SETUP THE ERROR LOOP ADDRESS 
;iSIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
7;;EQUAL TO A ‘~1°", SETUP FOR A SOFTWARE SWITCH REGISTER. 

MOV @#ERRVEC ,-( SP) ver ERROR VECTOR 

MOV #64 ,aMERRVEC ;SET UP ERROR VECTOR 


MOV #DSWR, SWR 7:SETUP FOR A HARDWARE SWICH REGISTER 
MOV #DDISP,DISPLAY ;;AND A HARDWARE DISPLAY REGISTER 
CMP #-1,aSWR 7zTRY TO REFERENCE HARDWARE SWR 
BNE 66$ -—s ? IF NO TIMEOUT TRAP OCCURRED 
THE HARDWARE SWR IS NOT = ~1 
BR 65$ SZBRANCH IF NO TIMEOUT 
64$: at #65$, (SP) SISET UP FOR TRAP RETURN 


65$: MOV ASWREG , SWR 
MOV #DISPREG, DISPLAY 


7zPOINT TO SOFTWARE SWR 


66$: MOV (SP)+,aWERRVEC ;;RESTORE ERROR VECTOR 
CLR $PASS ;CLEAR PASS COUNT 
BITB MAPTSIZE,SENVM TEST USER SIZE UNDER APT 
BEQ 67$ :YES,USE NON-APT 


SWITCH 
678 MOV ASSWREG , SWR TINO,USE APT SWITCH REGISTER 


CZ 
C2 


CZNCCA 


NCV11 


CZ2NCCA.P11 


633 


DIAGNOSTIC 
TYPE PROGRAM NAME 


005227 


000403 
112737 
000415 


112737 


062737 


17777 
030154 
002376 
000042 
001214 
001140 


000001 


000002 
001766 


001250 
001250 


000011 
001244 


177437 
002002 
160000 


002002 
001254 


000002 


MACY11 


000042 


000001 
000176 


001134 


052474 
000004 


001740 
001742 
001744 


001744 


27(654) 


8-AUG-78 
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-SBTTL _TYPE PROGRAM NAME 
33TYPE THE NAME Pg PROGRAM IF FIRST PASS 


-SBTTL 


70$: 
71$: 


37698: 
68$: 


1$: 


2$: 


INC 

BNE 68$ 

CMP #SENDAD , 0442 

BEQ 68$ 

TYPE 

BNE 70$ 

CMPB SENV,41 

BEQ 70$ 

CMP SWR ,ASWREG 

BNE 71$ 

GTSWR 

BR 71$ 

MOVB #1,$AUTOB 
68$ 

ASCIZ <CRLF>ACZNCCA 

. SBTTL PRIME ey NCV11 

MOVB #°C,RUNIT 

MOV #BUSTRP S@MERRVEC 

MOV #CSR,RO 

MOV $BASE ,R1 

MOV R1,(RO)+ 

ADD #2,R1 

CMP #CSRHB,RO 

BNE 

MOV $BASE , (RO) 

INC (RO) + 

MOV $BASE , (RO) 

ADD #11, (RO) + 

MOV $VECT1, ca 

MOV R1,R2 

SWAB R2 

BIC #177437,R2 

MOV R2,BRLEV 

BIC #160000,R1 

MOV R1,(RO)+ 

TST (R1)+ 

CMP #VECTB1+2,R0 

BNE 2$ 

MOV $CDW1,KWCSR 

MOV KWCSR,KWCSR1 

MOV KWCSR,KWPSR 

INC KWCSR1 

ADD #2,KWPSR 


2 FIRST TIME? 


H IF YES 
YPE ASCIZ STRING 


,69$ iTY 
4 VALUE Ry y SOF TWARE sui TCH REGISTER 


7sARE WE RUNNING UNDER XXDP/ACT? 
;;BRANCH IF YES 
: SARE WE RUNNING UNDER APT? 


CH IF YES 
; 3 SOF TWARE SWITCH REG SELECTED? 
BRANCH IF NO 
Z:GET SOFT-SWR SETTINGS 
33SET AUTO-MODE INDICATOR 


GET OVER THE ASCIZ 
NeViI DIAGNOSTICA<CRLF> 


ADDRESSES FROM THE DEFAULT VALUES 
;LOAD “CONTROL” SECTION BUS TRAP FLAG 
LOAD BUS TRAP RETURN ADDRESS 
:GET ADDRESS POINTER 
ZGET DEFAULT ADDRESS 
[LOAD AN VALUE 
;BUMP THE VALUE 
TEST IF DONE 


[BR IF NOT 

;LOAD ODD BYTE 
ADDRESSES 

GET DEFAULT VECTOR 
:COPY R1 


ZEXCHANGE BYTES 
STRIP OFF i BR LEVEL BITS 


STEST IF DONE 


:GET CLOCK ADDRESS 
SET CLOCK HIGH BYTE ADDR. 
;SET CLOCK PRESET ADDRESS 


SEQ 0027 


c 2 
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CZNCCA.P11 DIAGNOSTIC IDENTIFICATION TYPEOUT SEQ 0028 


-SBTTL DIAGNOSTIC IDENTIFICATION TYPEOUT 
005737 050116 TST AGAN TEST IF RESTART 
001017 BN RBEGO 7BR IF YES 
001134 _ ‘Oh IF pA te 


$ FN 
177777 050106 #~-1 ,RUNDIF S INDICATE TO RUN DIFLIN IN CHAIN MODE 
003356 LOGIC YES; RUN LOGIC AND DIFLIN TESTS 
050110 : WF MODE ZTEST IF OPTION CHECKOUT MODE 

4$ 7BR IF YES 


; TELL OPERATOR ABOUT OPTION AREA TESTS 
LIST ; TELL OPERATOR ABOUT THE TEST 
KEYBOARD COMMAND DECODER 


047101 : TYPE, &iSTi sPRINT ‘DOT"’ 
1$: ;READ THE RESPONSE 
052474 @(SP)+,RUNIT GET THE CHARACTER 
000040 052474 0 ENSURE UPPER CASE 
000042 052475 ° sF1IX ASCII ey 
000101 052474 DET “Y INE IF ANA 
2s 7BR IF NOT 


003276 RUN SITE ADJUSTMENT LOOP 
050110 : TEST IF ON THE TESTER 


3$ BR IF NOT 
000102 ;DETERMINE IF ANB 
3$ NOT 


:BR IF 
042322 BLAST ;RUN_THE oe a eden 
000104 ps a ge | IF AN 


BR IF 
050106 ‘INDICATE OIFLIN IS NOT TO BE RUN 
043712 SAND RUN IT 

000106 t cen 30 ag | IF AN F 


;BR IF 
177777 + 050106 #-1 ,RUNDIF zs INDICATE RUN DIFLIN AFTER THE LOGIC TEST 
003356 LOGIC SAND RUN LOGIC TEST 

050110 : WF MODE TEST IF OPTION CHECKOUT MODE 


6$ BR IF NOT 
000111 052474 a -RUNIT Ne ay AN I 
047106 POT IME [RUN IN-HOUSE > Eales LOOP 
000114 052474 : ete oe IF ANL 


BR IF 
050106 INDICATE "NO DIFLIN 
003356 
000110 052474 : 2 gen IF ANH 
10$ F NOT 


:BR 
002032 BEGIN START OVER 
000037 052474 : SDETERMINE IF AN ‘'?"' 
11$ IF NOT 


SBR 
000137 002032 START OVER 
005737 050110 : TEST IF OPTION CHECKOUT MODE 


001406 12$ BR IF NOT 
122737 000124 052474 [DETERMINE IF AN T 
001002 12$ 7;BR IF NOT 





D 3 
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CZNCCA.P11 KEYBOARD COMMAND DECOD SEQ 0029 


042050 BTALK ;KEYBOARD LOOP WITH BLASTER 
050110 12$: SS ‘On FR - talon CHECKOUT MODE 


BR_IF NO 
000103 052474 — : DETERMINE IF AN C 


:BR 
043004 PBLAST ;RUN M8036 PROM pa pice CODE 
000117 052474 : eects: Sy gn IF AN 


:BR IF NOT 
003240 XTTY ; CHANGE THE oe ADDRESS 
000123 052474 : aes : DETERMINE IF AN S 


IF NOT 
GET SWITCH REGISTER VALUE 
RBEGO ;RESTART 
000115 052474 : #'M,RUNIT SS at IF ANM 


FATFNG :BR IF 
000377 050106 #377 ,RUNDIF ioe ears oe WITH EXPAND REPORT | 
043712 DIFLIN [RUN DIF 





. 2 
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CZNCCA.P11 KEYBOARD COMMAND DECODER SEQ 0030 
753 ;THE OPERATOR SELECTED THE WRONG THING - THEY SOMETIME HAVE ‘FAT FINGERS" 
754 003202 104401 FATFNG: TYPE 
755 003204 001170 SQUES : TYPE QUESTION MARK 
756 003206 000616 BR RBE GO 
759 ;RETURN TO HERE UPON UNEXPECTED BUS TRAP 
760 003210 104401 052424 BUSTRP: TYPE, FATALO REPORT FATAL TRAP TO THE OPERATOR 
761 003214 011646 MOV (SP) ,-(SP) :GET TRAP ADDRESS 
762 003216 104402 TYPOC 
763 003220 005777 175714 1$: TST @aSWR : TEST IF HALT ON ERROR 
764 003224 100001 BPL 2$ 3BR_IF SET 
765 003226 000000 HALT ;FATAL BUS TRAP DETECTED 
766 003230 104401 052514 2$: TYPE, RUNITA 
a4 003234 000137 002012 JMP RTRT sRESTART 
769 ts = thea TO oer NEW TTY ADDRESS FROM THE OPERATOR 
770 003240 104401 052604 KTTY TYPE, ARNO ; TELL THE OPERATOR THE RULES 
771 003244 104412 RDOCT LISTEN TO THE OPERATOR 
772 003246 012600 MOV (SP) +,RO READ THEIR INPUT 
773 003250 001754 BEQ FATFNG = IF JUST "'CR'’ 

774 003252 005710 TST (RO) ADDRESS THE DEVICE AND CHECK BUS TRAP 
775 IF NO BUS TRAP - THEY MUST KNOW WHAT THEY ARE DOING ! 

776 003254 012701 001144 MOV ASTKS,R1 :GET POINTER 

777 +~003260 010021 1$: MOV RO, (Ri)+ [LOAD THE VALUE 

778 003262 005720 TST (RO) + ;BUMP VALUE 

779 ~=003264 020127 001154 CMP R1,ASTKS+10 TEST IF DONE ALL ADDRESSES 

780 003270 001373 BNE 1$ BR IF NOT 

4h 003272 000137 002042 JMP RTRTA RETYPE THE HEADER AGAIN ON THE NEW TERMINAL 
783 ;OPERATOR CHOSE THE FIELD ADJUSTMENT LOOP 

784 003276 104401 051250 TFSITE: TYPE, PRIM6 ;TELL_ OPER. ABOUT A017 

785 003302 104401 041374 TYPE, FIELDI SASK THE OPERATOR FOR INPUT Z MODE 
786 003306 005037 040410 CLR INOUTZ ;DEFAULT TO USER SUPPLIED Z PULSES 
787 003312 104411 RDLIN +READ OPER. INPUT 

788 003314 013637 003350 MOV a(SP)+,10$ T CHAR 

789 003320 142737 000040 003350 BICB #40,10$ ;ENSURE UPPER CASE 

790 003326 122737 000131 003350 CMPB #'Y,10$ sTEST FOR "Y* INPUT 

791 003334 001003 BNE 1$ BR IF NOT 

792 003336 012737 000002 040410 MOV #2, INOUTZ oN MAINT Z CONSTANT 

793 003344 000137 037354 1$: JMP FSITE ;NOW DO THE LOOP 

7 003350 000000 10$: 0 

796 003352 000000 ADNOKT: 0 ;LAST ADDRESS WITHOUT M.M. OR XXDP 
797 003354 000000 NLSI11: 0 NON-ZERO INDICATES LSI-11 PROCESSOR 


CZNCCA NCV11 
CZNCCA.P11 


003356 


DIAGNOSTIC 


MACY11 beets 


KEYBOARD COMMAND DECODE 


001202 
050110 
052332 


052545 
036402 
052565 


6 
002004 
003354 


036400 


036400 
003352 
036120 


172342 


172316 


002004 
000004 


000004 


LOGIC: 


4$: 


8-AUG-78 


RESET 
TS 
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s TEST IF FIRST PASS 
NOT 


IF 

“CHECK IF ON TESTER 
BR IF NOT 
TELL OPERATOR CABLE MUST BE CONNECTED 
; INDICATE NO KT11 

PC,$SIZE SIZE BASIC MEMORY SIZE 

48 aeicgeny :PROTECT ABSLDR 


s TEST IF XXDP CHAIN MODE ? 
1$ <BR IF NOT CHAIN MODE 
#3200. ,$LSTAD ;LEAVE ROOM FOR XXDP MONITOR 
$LSTAD ,ADNOKT : SAVE BASIC MEMORY STACE 
#BIT7,$KT11 WITH M.M. 
PC,$SIZE “DETERMINE THE AMOUNT OF MEMORY 
$KT11 sTEST IF KT11 IS HERE 
2$ : IF NOT 
#200, ,@4KIPAR1 r 
#77406 ,aAKIPDR1 
#400, a#KIPAR2 
#77406, @#KIPDR2 
#77406, a#KIPDR3 :4K, UP R/W FOR 60000 
#7600, ak IPAR7 71/0 PAGE MAP 
#77406, @4#K IPDR7 24K, UP, R/W FOR I/0 PAGE ACCESS 
$AUTOB : TEST IF AUTO MODE 
4$ ::BR IF AUTO MODE 
MSGMEM ; TELL OPERATOR THE AMOUNT OF MEMORY 
ees :GET LAST GOOD BANK 


RO ; CONVERT 
RO,-(SP) TYPE OUT DEC. VALUE 


MSGK sAND THEN TYPE OUT THE REMAINDER OF MEMORY ME SSAGE 
@FERRVEC,STEMP ;SAVE LOC 4 VALUE 

#3$ ,AMERRVEC :LOAD LOC 4 

NLSI11 INDICATE NOT A LSI-11 CPU 

PSW [SHOULD FAIL IF LSI-11 

ee RESTORE te 4 VALUE 


NLSI11 SET AN LSI-11 FLAG 
[RETURN 


SEQ 0031 





CZNCCA NCV11 
CZNCCA.P11 


IFY 


000100 
000004 


176010 


000001 
004014 


000001 
004014 


004014 
030076 


MACY11 27(654) 8=AUG=78 15:05 


PAGE 20 
THE 8 NCV11 AND 2 NCV11 CLOCK BUS ADDRESSES RESPOND SEQ 0032 


BD RR I TI TI TIT TORR TTT IT TORII IOI III SII NSIS III NAM 
s*TEST 1 VERIFY THE 8 NCV11 AND 2 NCV11 CLOCK BUS ADDRESSES RESPOND 
PIP hahahah kk Sakae ha hehe la hehehehe hahalahelahalehehalehehelahehehelelehaheielaheloleieialeieleheieiaieicieleleieieiolel 
TST1: 
001160 MO #100, $TIMES 3;D0 100 ITERATIONS 
004014 @FVERRVEC,10$ : SAVE BUS TRAP VECTOR 
000004 #1$ ,AMERRVEC LOAD BUS TRAP VECTOR 
acsrR s ADDRESS 


+ THE 
“NCV11 


@BAR1 ADDRESSES 
000004 #2$, aAERRVEC “LOAD NEW RETURN 
aKWCSR ‘TEST CLOCK 


TST @KWPSR ee 
;TEMP FIX THE DIAG TO a USE CLOCK JUMPERS 
004016 MOV #1 ,DEADKW ; INDICATE NCV11 CLOCK IS NOT THERE; TEMP. FIX UNTIL ECO M 
000004 108, @AERRVEC RESTORE THE BUS TRAP VECT OR 
STe ;;BR AND TEST THE NCV11 
1$: MP (P+, (SP)+ ;CLEAN THE STACK 
1 BUS TRAP WHEN REF ERENC ING THE NCV11 


BR 3$ 
2$: (SP)+, (SP)+ 7CLEAN THE STACK 
41 ;BUS TRAP WHEN REFERENCING THE NCV11 CLOCK 
004016 #1 ,DEADKW s INDICATE NCV11 CLOCK IS NOT THERE 
000004 1 laa SRESTORE LOC 4 


2 
000004 3$: 10$ ,a#ERRVEC RESTORE BUS TRAP VECTOR 
$SEOP XIT 


10$: 0 
DEADKW: 0 sNON-ZERO SAYS NO NCV11 CLOCK 
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012737 
013777 


000001 


000010 
007776 


000200 
175572 
001124 


001124 
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1 ACROSS 10 BITS OF THE COMMAND/STATUS REG. SEQ 0033 


00116 
00111 
00200 


0 
0 
4 


175674 


001126 


002004 


001160 
175606 


001124 
001126 
001126 


001160 


001126 


FI I I EER KIKI IK IIHR IKI RRERER 


s*TEST 2 FLOAT ~ 1 ACROSS 10 BITS OF THE COMMAND/STATUS REG. 


PIR kha t ka Rakha h Sakae ka hehehehe hakahahelahaiahahelahalelahelehahelelaielehehelahalelsheielaheislaieieiaheisieleioieielal 


TST: 
#100, $TIMES ::D0 100 ITERATIONS 
#1$,$LPERR ;LOAD LOOP ADDRESS 
#B1T11,$TEMP ;LOAD INITIAL REG. VALUE 


STEMP,,aCSR ;LOAD CSR REG. 
aCSR,$BDDAT READ CSR 

STEMP ,SGDDAT sLOAD EXPECTED 
#B1T7,$GDDAT FUDGE THE ‘READY’ BIT 
recat on ; COMPARE THE VALUES 


: SAME 
2 UNEXPECTED VALUE IN THE CSR REGISTER 


$STEMP TRY THE NEXT DATA BIT 
#1,$TEMP :TEST IF NOW BIT 0 
1$ BR IF NOT 


FD II III ITI TT ITI TT TICK IK II IK III I ITI 


s*TEST 3 VERIFY THAT “‘INIT’’ CLEARS THE CSR REGISTER 


SLAP EERE EKER EEE EERE EKER EKER EERE EEE EE 
TST3: 
#10, $TIMES 3:D0 10 ITERATIONS 
;LOAD CSR 


#7776,aCSR REG. 
sINITILIZE THE REGISTER 
#B1T7,$GDDAT SLOAD EXPECTED VALUE 
aCSR,$BDDAT SREAD CSR REG. 
$GDDAT , $BDDAT State THE VALUES 
TST4 7;BR IF EQUA 
BUS INIT’' FAILED TO CLEAR CSR REG. 


RRR KERR KEKE REE EERE EKER EEK EEK EKEKEKEEEEREEKKEKEKEKEKEKKKKKE 


2 TEST 4 VERIFY THAT ‘‘CLEAR ALL"’ CLEARS THE CSR REGISTER 


RRR KERR KEKE KEEKEKEKEEEKEKEEKEEREEKEKREKEKEKEEKKEKKKEEKKK 


1814: 
#10,$TIMES ::D0 10 ITERATIONS 
#7776, aCSR :LOAD CSR REG. 
#CLRALL,@SFR GENERATE ‘CLR ALL L' 
LOAD EXPECTED VALUE 
‘READ THE CSR REG. 
COMPARE VALUES 


F SAME 
:‘CLR ALL L*' FAILED TO CLEAR CSR REG. 





os 


: 2 
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CZNCCA.P11 VERIFY LOW BYTE OPERATION OF THE ‘‘CSR'’ REGISTER 


PR he kkk kh kk hak kahak halakha halehafalahalahahelahalahehalehehelehalelelahelelaielelehelchaieleleleioieislcieieiohel 
SSTEST 5 VERIFY LOW BYTE OPERATION OF THE ‘'CSR’’ REGISTER 
MRK EEE KEKKEKKKKKEKKAAKEKEKEKKEKEK 
i815: 
001160 #100, $TIMES 32:D0 100 ITERATIONS 
175466 #3636,aCSR ;LOAD CSR REGISTER 
001124 #3600,$GDDAT ;LOAD EXPECTED VALUE 
CSR ;CLEAR LOW BYTE 
001126 aCSR,$BDDAT TREAD STATUS REG. 
001126 SGDDAT , $BDDAT ; COMPARE VALUES 
1$ 7:BR IF SAME 
2 ;CLEARING LOW BYTE OF THE CSR CHANGED THE HIGH B 
175426 : #3636,aCSR ;LOAD CSR REGISTER 
001124 #236, $GDDAT ;LOAD EXPECTED VALUE 
@aCSRHB ;CLEAR HIGH BYTE OF THE CSR 
001126 acsR,$BDDAT ;READ STATUS 
001126 $GDDAT, SBDDAT ; COMPARE VALUES 
TST6 ;7BR IS SAME 
3 :CLEARING HIGH BYTE OF CSR CHANGED THE LOW BYTE 
LER REE E REE REE REE REE AS EKKEKKEEEEREKEEEKKEKEEEERREEEREE 
s*TEST 6 FLOAT A 1 ACROSS 4 spITS OF THE SPECIAL FUNCTION REGISTER 
LL EERE REE RRR ERE EERE EE EEE EER EKER KER E 
TST6: 
004370 001110 #1$,$LPERR ;LOAD LOOP ADDRESS 
012737 000020 002004 #BIT4, STEMP S LOAD INITIAL REG. VALUE 


013777 002004 175360 1$: STEMP ,aSFR =LOAD SFR REG. 
READ SFR 
LOAD EXPECTED 
001126 $GDDAT, S$BDDAT ; COMPARE THE VALUES 
2$ ;7BR IF SAME 
3 ;UNEXPECTED VALUE IN THE SFR REGISTER 
: $STEMP : TRY THE NEXT DATA BIT 
002004 #1,$TEMP S TEST IF NOW BIT 
1$ ‘BR IF NOT 


RK ERE EEREKEEEKEEEKEKEKKEKEEKEEKEEEKEKEKKEKKEKEKEKEKE 

*STEST 7 VERIFY THAT CLEARING HIGH BYTE OF SFR DOES NOT CLEAR LOW BYTE 

PTT TT ITI Titi tit ti titi iti titi ttiti titi ttt iti tt titi iit te ttl 2 

TST7: 
001160 #10, $TIMES 32:DO 10 ITERATIONS 
175300 #14,aSFR sLOAD THE S.F. REGISTER 
001124 #14, $GDDAT ;LOAD THE EXPECTED VALUE 

@SFRHB :CLEAR HIGH BYTE OF S.F. REG. 

001126 aSFR,$BDDAT READ THE REGISTER 
001126 $GDDAT , $BDDAT C0 — THE VALUES 


TST10 
;CLEARING HIGH BYTE OF CSR REG. CHANGED THE LOW 





on 
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000016 


001124 
175216 


175154 
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001160 
175230 


001126 


001160 


001126 


THAT ““INIT’’ CLEARS THE SFR REGISTER SEQ 0035 


RARER RARER REE REE EERE EERE EEE REE REEERRERERREEEERREEEEEEEREEE 


:STEST 10 VERIFY THAT "‘INIT’’ CLEARS THE SFR REGISTER 


RIEU OISI IIIS ISIS ISIS IUISIIIIOIIOIISIISIOIIIOIOIDIOIOIOIOITIIOI IOI TTI 
S110: 
#10,$TIMES 3:D0 10 Spo eny 
st 


#16,9SFR SFR REG. 
sINITILIZE THE REGISTER 
$GDDAT [LOAD EXPECTED 
@SFR,$BDDAT ;READ SFR REG. 
TST11 7;BR IF EQUA 

BUS INIT’’ FAILED TO CLEAR SFR REG. 


J RRR EE EERE REE REE EKER EEK EREEEREREREREEEREEEE 
TRTEST 11 VERIFY THAT “'CLEAR ALL’' CLEARS THE SFR REGISTER 
AA RISOTTO III IIIS TIT ISSA S AAAS ASA 
TST11: SCOPE 
MOV #10, $TIMES ::D0 10 ITERATIONS 
MOV #16,aSFR ;LOAD SFR REG. 
BIS #CLRALL ,@SFR GENERATE "'CLR ALL 
CLR SGDDAT ;LOAD EXPECTED vat UE 
AFR, SBDDAT READ THE SFR REG. 


BEQ F SAME 
ERROR 3 :""CLR ALL L** FAILED TO CLEAR SFR REG. 





an 
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012737 
012777 


001124 


012737 
012777 


012737 
012777 


001124 
174720 
001124 


001124 
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CZNCCA.P11 FLOAT A 1 ACROSS THE WORD COUNT REGISTER 


Ssiy SSS 
MNO] —]NW—O 
AQans® OfoO 


001160 
001124 
001110 


175026 
175016 
001126 
001126 


001160 
001124 
001170 


174740 


001126 


SD II I I I I I I I IK KI IT II TT IIT TIT TI 


s*TEST 12 FLOAT “ 1 ACROSS THE WORD COUNT REGISTER 


FL IRIE ERE KIKI EER EERE EEE 


TST1l2: 
#100, $TIMES 32D0 100 ITERATIONS 
#B1T0,$GDDAT LOAD EXPECTED VALUE 
#1$,$LPERR ;LOAD LOOP ADDRESS ON ERROR 


ACLRALL ,@SFR sRESET THE DEVICE 
OUNT 


$GDDAT , SBDDAT > COMPARE VALUES 
2$ 3 SAME 
4 :zWORD COUNT REG. IN ERROR 


2$: SGDDAT ; CHANGE THE DATA 
1$ ;BR IF MORE DATA TO LOAD 


FI IRR I KEE EK EE 


z*TEST 13 FLOAT A 1 ACROSS THE BUS ADDRESS REGISTER 


J LAR E REE RER ERE EE EERE ERE EEE EEE REE EERE EREER EER 


TST13: 
#100, nins? 7:D0 100 ITERATIONS 
#B1TO, $GD ;LOAD EXPECTED VALUE 
#1$, SiPERR ;LOAD LOOP ADDRESS ON ERROR 


ACLRALL ,@SFR RESET THE DEVICE 
SGDDAT , @BAR ;LOAD BUS ADDRESS ‘‘A’’ 
@BAR , SBDDAT [READ BUS ADDRESS 
gta pam ; COMPARE VALUES 


SAME 
5 ;BUS ADDRESS REG. IN ERROR 


2$: S$GDDAT CHANGE THE DATA 
E 1$ ;BR IF MORE DATA TO LOAD 


LER REE REE EERE EERE ERE EREEKEKREEEKEEEKEEEEREKERREEEEE EE 


s*TEST 14 FLOAT A 1 ACROSS THE OFFSET REGISTER 


LL RRR EEE EEE EERE EEE EEK EEREEEEKEEEEEEREEEEREREEREKEEEEEEE 


TST14: 
#100, $TIMES 32:D0 100 ITERATIONS 
#B1T0,$GDDAT ;LOAD EXPECTED VALUE 
#1$,$LPERR ;LOAD LOOP ADDRESS ON ERROR 


ACLRALL,@SFR sRESET THE DEVICE 
$GDDAT, a0FF sLOAD OFFSET ‘‘A’’ 
acrFF, SBDDAT sREAD OFFSET 

$GDDAT, SBDDAT zCOMPARE VALUES 

2s :7;BR IF SAME 

6 ZOFFSET REG. IN ERROR 


SGDDAT CHANGE THE DATA 
1$ ;BR IF MORE DATA TO LOAD 





an 
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104007 
012777 


000010 


004000 
011111 
022222 
033333 

36 


0000 
007636 
011111 


174610 
001124 


022222 
033333 


174540 
001124 


000036 
174514 
001124 


007636 
174456 
001124 


004000 
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001126 


001124 
001126 
001126 


001124 
001126 
001126 


174444 
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SEQ 0037 


FREER EERE EERE EREREEEEAREEKKEEREKEKEREREKEREH 


TATEST 15 VERIFY NO DUAL REGISTER SELECTION 


SEERA EKEEEEREKEKEKREKEKEKEKEKEERERKEKEEEEEKEEEKREEKKEKEKE 


18115: SCOPE 
MOV #10,$TIMES 3:D0 10 ITERATIONS 
;LOAD DIFFERENT NUMBERS INTO THE WCR, BAR AND OFF REGISTERS 
MOV CLEAR THE DEVICE 
[LOAD OFFSET REGISTER 
[LOAD W.C. REGISTER 
LOAD B.A. REGISTER 
ota SPECIAL FUNCTION REGISTER 


MOV #7636,aCSR COMMAND/STATUS REGISTER 
zNOW READ EACH REGISTER AND poem THE vai UE 
MOV #11111,$GDDAT ;LOAD EXPECTED VALUE 
@0FF ,SBDDAT *READ A OFFSET REG. 
$GDDAT , $BDDAT > COMPARE 
1$ 727BR IF SAME 
7 ;DUAL ADDRESS ERROR 
#22222 ,SGDDAT ;LOAD EXPECTED VALUE 
aWCR,S$BDDAT ;READ W.C. REG. 
ancien a 


AME 
7 ;DUAL ADDRESS ERROR 
#33333 .$GDDAT ;LOAD EXPECTED VLAUE 
@BAR , SBDDAT READ B.A. REG. 
ey aes ; COMPARE 


SAME 

;DUAL ADDRESS ERROR 

LOAD EXPECTED VALUE 

READ SPECIAL FUNCTION REG 


7 

#36, SGDDAT 
@SFR,$BDDAT 
eta emt = 


AME 
DUAL ADDRESS or 
;LOAD EXPECTED V. 


7 

#7636, $GDDAT 
acSR, $BDDAT READ 
SCDDAT, - SBDDAT ; COMPAR 


SAME 
;DUAL ADDRESS ERROR 
:CLEAR THE DEVICE 


ALUE 
Bs surmise REGISTER 


7 
ACLRALL ,@SFR 
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CZNCCA.P11 T16 VERIFY "CLR ALL'’ CLEARS THE EXTENDED OFFSET BITS 


DDS RAISE ISIS IIOIIISISIIISISIIISIIIOIOIIISIOIIIDIOIIOIOIIIIOITIIIIIO IOI TOT TOT 

z*TEST 16 VERIFY ‘‘CLR ALL*’ CLEARS THE EXTENDED OFFSET BITS 

DOORS IGIISISISISIIOIIIAIOISISISISISIIOISIIOISIISIIIOIOIOICIOIIIIUICIIIOIIOIOI IOI IDO TOT TIT TOE 

TST16: 
000010 001160 MO #10,$TIMES 3;D0'10 ITERATIONS 
001124 SGDDAT ;CLEAR EXPECTED VALUE 
004000 174422 ° :CLEAR THE DEVICE 
000003 174406 #3, 0F F [LOAD EXTENDED OFFSET REGISTER 
004000 174406 ;CLEAR THE EXTENDED OFFSET REG.'S 
174374 001126 F ,SBDDAT SREAD EXTENDED OFFSET REG. 

7;BR IF CLEARED 
CLEAR ALL FAILED TO CLEAR EXTENDED OFFSET REGIS 


FLARE RRR EKER EERE EERE EEK ERKEREEEEEEKEEEEEEEKKEEKEKEEEE 
s*TEST 17 TEST THE ‘‘ACTIVE’’ FLOP CAN SET AND CLEAR 
FLARE RARER EERE ERE EERE ERE EREKEEEEKEEEEREREEEERRERKEE 
TST17: SCOPE 
174364 MOV ACLRALL,@SFR sCLEAR THE DEVICE 
174356 ae #TSTDMA,aSFR sSET THE ‘TEST DMA" TO PREVNT DATA TRANSFERS 
NOP 
000240 NOP 
052777 174332 BIS #B1T4'BIT1,aCSR SET ‘MATRIX MODE'’ AND ‘BYTE’ MODE 
;NOW SET THE ‘‘ACTIVE’’ FLOP AND VERIFY “INTERFACE IDLE*’ GOES ay 
012737 MOV #B1T4'BIT1,$GDDAT ;LOAD EXPECTED VALUE 
0,aCSR SET ACTIVE’ TOA 1 
acsR, $BDDAT TREAD STATUS 
$GDDAT, SBDDAT ;COMPARE VALUES 
1$ 7;BR IF EXPECTED 
174302 #ENDDMA ,aSFR ah DMA IF POSSIBLE 
ERR 1 CTIVE’* FLOP FAILED TO SET 
;POKE THE "END DMA" a. _ VERIFY nitive” CLEARS 
174272 i$: BIS #ENDDMA ,@ ;SEND "END DMA*’ SIGNAL 
mel /seiTe:8111, SGDDAT 7SET nr +h IDLE’* INTO EXPECTED 
acSR,$B8DD [READ STATUS 
$GDDAT, SBDDAT ; COMPARE 
2s 77BR IF SAME 
ERROR 1 :"'END DMA’’ AGAIN FAILED TO CLEAR ‘‘ACTIVE'* FLOP 
:POKE “ENABLE DMA’’ AND THEN ISSUE rhe ALL"’ SIGNAL TO 
ENSURE THE 1 seas FLOP CLEARS 
5: MOV #B1T7,$GDDA sLOAD EXPECTED 
1T0,acs :POKE “ENABLE DMA’ 
7GENERATE ‘‘CLR ALL*’ 
1126 ;READ STATUS 
001126 $GDDAT, SBDDAT + COMPARE 


TST20 F SAME 
:"CLR ALL** FAILED TO CLEAR ‘‘ACTIVE’’ FLOPS 


3 


1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Ww Nh RON NOPOy @ @ Se Sw woe Oo 
UYSVSVRVRAVVSSaNRnRAn=sSVRQVRARKALLS 
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CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG-78 
CZNCCA.P11 T20 VERIFY Z INPUTS CAUSE THE LOW 8 BITS OF 32 BIT COUNTER TO CHANGEIN MATRIX MODE SEQ 0039 Ci 
1133 RARE AERA REAR EKREEEKEEKRKE 
1134 TATEST 20 VERIFY Z INPUTS CAUSE THE LOW 8 BITS OF 32 BIT COUNTER TO CHANGEIN MATRI 
1135 RARER EEE RARER AREER EEKKKEEE 
1136 005554 18120: SCOPE 
1137 005556 012737 000100 001160 MOV #100,STIMES 32D0 100 ITERATIONS’ 
1138 005564 012777 004 174164 MOV ACLRALL ,@SFR CLEAR THE DEVICE 
1139 005572 012777 000010 174156 MOV #TSTDMA,aSFR 7SET TEST DMA FLOP 
1140 005600 012777 174144 MOV #0,awCR TLOAD W.C. REG 
1141 5606 012777 174140 MOV #0, @BAR [LOAD B.A. REG 
1142 005614 012777 000022 174124 MOV #B1T4!B1T1,aCSR sENTER MATRIX MODE 
1143 2 052777 000001 174116 BIS #B1T0,aCSR 2GO "‘ACTIVE*’ 
1144 052777 000002 174120 BIS MTESTZ,ASFR sENABLE "TEST 2Z'* PULSES 
1145 042777 000002 174112 BIC ATESTZ,@SFR ;DISABLE ‘TEST 2°* PULSES 
1146 012737 000001 001124 MOV #1, $GDDAT LOAD EXPECTED 
1147 017737 174076 001126 MOV @BAR , SBDDAT ;READ LOW 16 BITS 
1148 001002 BNE 1$ 3;BR IF NON-ZERO 
1149 104010 ERROR 10 :Z INPUT FAILED TO CAUSE THE LOW BYTE OF 32 BIT 
1150 20 BR TST21 33 
1151 017737 174060 001126 1$: MOV a'/CR, $BDDAT READ HIGH 16 BITS 
1152 001401 BEQ ef 73BR IF CLEARED 
1153 104011 ERROR 11 ;HIGH 16 BIS CHANGED IN ERROR 
1154 012737 000020 001124 2$: MOV #B1T4 ,SGDDAT ;LOAD Aah _ 
1155 017737 174034 001126 MOV @aCSR,$BDDAT TREAD $ 
1156 032737 040000 001126 BIT #B1T14,$8DDAT ; TEST IF "CELL OVERF LOw"* 
1157 001401 BEQ TST21 3;BR IF CORRECT 
1158 104012 ERROR 12 :"‘CELL OVERFLOW’’ FLOP SET IN ERROR 
1159 PITTTITTIIT LITT LTT TILL LLL LLL ceibiddiad 
1160 TATEST 21 VERIFY Z INPUTS CAUSE THE LOW 16 BITS OF 32 BIT COUNTER TO CHANGE 
1161 DHEA EEE EEUU IIUIIEIOIOIUII I IIIINIOIOII TER Itt iit 
1162 TST21: SCOPE 
1163 012737 000100 001160 MOV #100, $TIMES 3:D0 100 ITERATIONS 
1164 012777 004000 174012 MOV ACLRALL ,@SFR ;CLEAR THE DEVICE 
1165 012777 000010 4004 MOV #TSTDMA,ASFR [SET TEST DMA FLOP 
1166 012777 173772 MOV #0,aWwCR = LOAD W. be REG 
1167 012777 000376 173766 MOV #376, @BAR ;LOAD B.A. REG 
1168 012777 000022 173752 MOV #B1T4!BIT1,aCSR SENTER MATRIX MODE 
1169 052777 000001 173744 BIS #B1T0,aCSR 7G0 ACTIVE’ 
1170 052777 000002 173746 BIS MTESTZ,@SFR zENABLE ‘‘TEST 2°" PULSES 
1171 042777 000002 173740 BIC AMTESTZ,@SFR DISABLE ‘TEST 2°* PULSES 
1172 012737 000400 001124 MOV #B1T8, SGDDAT ;LOAD EXPECTED 
1173 017737 173724 001126 V @BAR , $BDDAT READ LOW 16 BITS 
1174 105737 001127 TSTB SDDAT+ TEST HIGH BYTE 
1175 001002 BNE BR IF NON-ZERO 
1176 104010 ERROR 10 3Z INPUT FAILED TO CAUSE THE HIGH BYTE OF THE LO 
1177 000423 BR TST22 ae 
1178 012737 1124 18: MOV #0, $GDDAT ;LOAD EXPECTED 
1179 017737 173674 001126 MOV awCR,$BDDAT ;READ HIGH 16 BITS 
1180 001401 BEQ 2$ :iBR IF CLEARED 
1181 104011 ERROR 11 HIGH 16 BITS CHANGED IN ERROR 
1182 012737 000020 001124 2$: MOV #B1T4,$GDDAT LOAD EXPECTED 
1183 017737 173650 001126 MOV @aCSR,$BDDAT SREAD STATUS 
1184 032737 040000 001126 BIT #B1T14,$BDDAT zTEST IF ‘CELL OVERFLOW’ 
1185 001401 BEQ TST22 7;BR IF CORRECT 
1186 104012 ERROR 12 :‘CELL OVERFLOW’’ FLOP SET IN ERROR 
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CZNCCA.P11 T22 VERIFY Z INPUTS CAUSE THE LOW 24 BITS OF 32 BIT COUNTER TO CHANGE 


1187 FRR RRR REE EERIE EERE ERR EERE ER ERE EEE RER ERR EER 
s*TEST 22 VERIFY Z INPUTS CAUSE THE LOW 24 BITS OF 32 BIT COUNTER TO CHANGE 
FF III I IT IT TIT I IK II IIT ITT IT TRI RRR 
TST22: 
001160 MOV #100, $TIMES 3:D0 100 ITERATIONS 
#CLRALL.@SFR ;CLEAR THE DEVICE 
A#TSTDMA,ASFR :SET TEST DMA FLOP 
#0,awCR 


#-2,QBAR 
#B1IT4!BIT1,aCSR “ENTER MATRIX MODE 
#BITO,aCSR :GO “ACTIV vE'’ 
ATESTZ,ASFR sENABLE ''TEST Z'' PULSES 
ATESTZ.ASFR : DISABLE “TEST 2°’ PULSES 
#1,$GDDAT ;LOAD EXPECTED 
173536 001126 : cement ZREAD “2 16 BITS 
+er28 :LOW BYTE OF THE HIGH 16 BITS FAILED TO CHANGE 
000020 001124 s #B1T4,$GDDAT ;LOAD ea th 
173510 001126 acSR,$BDDAT ;READ STATUS 
040000 001126 #B1T14,$BDDAT sTEST IF ‘‘CELL OVERFLOW’ 
TST23 Ss0R if CORR ECT 
12 :"‘CELL OVERFLOW’' FLOP SET IN ERROR 
 CRRRREREEREREREERREARESERERERRRERARARERERAERERERRERARRARAARRAAEES 
TRTEST 23 VERIFY Z INPUTS CAUSE THE HIGH 8 BITS OF THE 32 BIT COUNTER TO CHANGE 
TIC RIOT OI I IIIS INI III ISIS SISA: 
TST23: 
000100 001160 MO #100, $TIMES 3:D0 100 ITERATIONS 
ACLRALL ,@SFR ;CLEAR THE DEVICE 
ATSTDMA,ASFR :SET TEST DMA FLOP 
#377 ,AWCR G 


#-2, BAR 
#B114!BIT1,aCSR “ENTER MATRIX MODE 
#B1TO,aCSR :GO "'ACTIVE’' 
AMTESTZ,@SFR ;ENABLE ''TEST 2** PULSES 
ATESTZ,@SFR [DISABLE ‘'TEST 2'* PULSES 
#B1T8,$GDDAT ;LOAD EXPECTED 
001126 : MO aWCR,$BDDAT ;READ HIGH 16 BITS 
001127 $BDDAT+1 ;TEST HIGH BYTE 
BN TST24 ::BR IF SET 
104012 12 HIGH 8 BITS OF THE 32 BIT COUNTER FAILED TO CHANGE 


—_ 
_— 
SS 


a a ed od d= 8 
BELRSLAVLS 


RaRes 


Seue 


Fwnr-oO 


1 
7 
7 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
7 
1 


SCOOONAU 
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DO NOT CAUSE THE LOW 8 BITS OF 32 BIT COUNTER TO CHANGE IN LIST MODE 


RR KEKE REE EEKREKEEKKKKKEK 


TATEST 24 VERIFY Z INPUTS DO NOT CAUSE THE LOW 8 BITS OF 32 BIT COUNTER To CHANGE 


CZNCCA NCV11 
CZNCCA.P11 


DIAGNOSTIC 


T24 VERIFY Z INPUTS SEQ 0041 


052777 
052777 
042777 
013700 
005001 
012737 
032777 


104012 


000000 
173302 


000002 
000002 
002006 


040020 
040000 


000400 


004000 


001124 


001160 
173334 
173324 
173316 


001124 
001126 


001160 


173212 
173214 
173206 


001124 
173154 


173144 


173132 


001126 


SUAS ISIS EIS IIIS IIE IOI IIIT I TTT TI TTT TT TT TT TOE 


TST24: 
#100, $TIMES 
ACLRALL ,@SFR 
#0,aWCR 
#0,@BAR 
acsR 
ATESTZ,ASFR 
ATESTZ,ASFR 
#0, $GDDAT 
@BAR , $BDDAT 
. 


3;D0 100 ITERATIONS 
;CLEAR THE DEVICE 


ENSURE LIST MODE 
ENABLE “TEST 2"' PULSES 
:DISABLE ‘TEST Z°' PULSES 
= LOAD EXPECTED 

READ LOW 16 BITS 


;2BR IF 7ER 0 
3Z INPUT CAUSE THE 32 BIT COUNTER TO CHANGE IN LIST MODE 


FI II KIT III KERR EERE ERE 


TATEST 25 


TEST THAT 'WCA OVFL'’ SETS Z/WC OVERFLOW FLOP AND ‘CLR ALL"’ CLEARS IT 


TTT TTT TTT TTT TTT LTT LLL TLE LLL LLL LLL 


TST25: 


#10, $TIMES 
#CLRALL ,@SFR 
ATSTDMA ,ASFR 
#-1,aWCR 

#-2, 2BAR 
wolte'B111. -@CSR 


IS #B1T0,aCS 
. “TEST Z** INPUTS 


ATESTZ,ASFR 
ATESTZ,ASFR 
CPUDLO,RO 


R1 
#B1T14!B1T4,$GDDAT 


#B1T14,aCSR 
2$ 


1$ 
a" 
TST26 


;NOW GENERATE ‘'CLR ALL’ TO CLEAR 2/wC ee en BIT 
2s: BIS CLEAR 


ACLRALL ,@SFR 
#BIT7, $GDDAT 
@CSR, $BDDAT 
$GDDAT , $BDDAT 
3 


3:D0 10 ITERATIONS 

CLEAR DEVICE 

;SET TEST DMA FLOP 

= LOAD Z COUNTER 
;LOAD Z COUNTER 
ZENTER ‘MATRIX'' MODE 
ENABLE NCV11 


;ENABLE ‘'TEST 2°* PULSES 
DISABLE *‘TEST 2°" PULSES 
;LOAD GROSS TIMER 

;LOAD EXPECTED STATUS 
TEST FOR Z/WC OVERFLOW 
:BR IF SET 

DELAY 

DELAY 


;STOP DMA TRANSFERS 
sAFTER A’ GROSS TIME, THE PWC OVERFLOW FLOP FAILED TO SE 


Z/wWwC FLOP 
[LOAD EXPECTED 
;READ STATUS 
ARE 


F SAME 
:‘"CLR ALL'’ FAILED TO CLEAR ‘'Z/wC** FLOP 
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CZNCCA.P11 T26 TEST THAT 'WCA OVFL*' SETS Z/WC OVERFLOW FLOP AND ‘CLR WC OVFL'’ CLEARS IT SEQ 0042 
1279 | oy cet ech chan tagging atte dapagtetngoa ly 
1280 LATEST 26 TEST THAT ‘WCA OVFL’’ SETS Z/WC OVERFLOW FLOP AND ‘CLR WC OVFL'’ CLEARS IT 
1281 KERR EERE K EKER EKEKEKKEKEKKK 
1282 006652 000004 18126: SCOPE 
1283 006654 012737 000010 001160 MOV #10, $TIMES D0 10 ITERATIONS 
1284 006662 012777 004000 173066 MOV ACLRALL .@SFR CLEAR DEVICE 
1285 006670 012777 000010 173060 MOV ATSTDMA ,aSFR ;SET TEST DMA FLOP 
1286 006676 012777 177777 173046 MOV #-1,awCR [LOAD Z COUNTER 
1287 006704 O1c777 177776 173042 MOV #-2 ,@BAR ;LOAD Z COUNTER 
12 006712 012777 000022 173026 MO', #B1T4!BIT1,aCSR ENABLE ‘MATRIX'' MODE 
1289 006720 052777 000001 173020 BIS #B1T0,aCSR SET NCV11 ACTIVE 
1 NOW ENABLE “‘TEST 7°’ INPUTS 
1291 006726 052777 000002 173022 BIS ATESTZ,@SFR sENABLE ‘‘TEST Z°* PULSES 
1s 006734 042777 000002 173014 BIC ATESTZ,@SFR ;DISABLE ‘‘TEST 2** PULSES 
1294 006742 013700 002006 MOV CPUDLO,RO ;LOAD GROSS TIMER 
1295 006746 005001 CLR R 
io 006750 012737 040020 001124 MOV #B1T14!BIT4,$GDDAT ;LOAD EXPECTED STATUS 
1298 006756 032777 040000 172762 1$: BIT #B1T14,aCSR TEST FOR Z/WC OVERFLOW 
1299 006764 001014 BNE 2$ 7BR IF SET 
1300 006766 005301 DEC R1 ;DELAY 
1301 006770 001372 BNE 1$ 
1302 006772 0053 DEC RO :DELAY 
1303 006774 001370 BNE 1$ 
1304 006776 012777 000400 172752 MOV MENDDMA, — = STOP DAM TRANSFERS 
1305 007004 042777 000002 172744 BIC #TESTZ, SFR STOP *'2'' INPUTS 
1306 007012 104012 ERROR 12 ;AFTER A GROSS TIME, THE Z/WC OVERFLOW FLOP FAILED TO SET 
ie 007014 000416 BR TST27 ze 
1309 ;NOW GENERATE ‘'CLR WC gt TO CLEAR Z/wWC OVERFLOW BIT 
1310 007016 052777 040000 172732 28: BIS ACLRWCO,aSF ;CLEAR Z/WC FLOP 
1311 007024 012737 000022 001124 MOV #B1T4'BIT1, SGDDAT [LOAD EXPECTED 
1312 007032 017737 172710 001126 MOV acSR,$BDDAT READ STATUS 
1313 007040 023737 001124 001126 CMP $GDDAT , SBDDAT > COMPARE 
1314 007046 001401 BEQ TST27 33BR IF SAME 
1315 007050 104012 ERROR 12 :'CLR WC OVFL*’ FAILED TO CLEAR ‘'Z7/wWC** FLOP 
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CZNCCA.P11 T27 TEST THAT ‘WCA OVFL*’ GENERATES AN INTERRUPT 


RRR REE EKER KKK EKEKEKKREKEEEKKK 


:*TEST 27 TEST THAT ‘WCA OVFL'’ GENERATES AN INTERRUPT 


FF CI I IIR II IIT I KR IK ITI IO IIR II IT II IR TR I 


TST27: 
#10,$TIMES 32D0 10 ITERATIONS 
ACLRALL ,@SFR CLEAR DEVICE 
#TSTDMA,aSFR :SET TEST DMA FLOP 
#-1,awCR LOAD Z COUNTER 
#-2 ,QBAR LOAD Z COUNTER 
00002 #B1T4'BIT1,aCSR SET MATRIX MODE 
052777 172620 S #BITO,aCSR SET NCV11 ACTIVE 
“TEST Z'* INPUTS 
052777 172622 Is ATESTZ.@SFR sENABLE ‘TEST 2°" PULSES 
172614 ATESTZ,@SFR “DISABLE ‘TEST 2°’ PULSES 
CRUOLO.RO LOAD GROSS TIMER 


005001 

012737 001124 #B1T14!BIT4,$GDDAT ;LOAD EXPECTED STATUS 

032777 172562 : #B1T14,aCSR ;TEST FOR Z/WC OVERFLOW 
2$ BR IF SET 


DELAY 


KiKi 
ANAUSWN—OVOONG 


WwW 
N 


Mmrony 


WW 


ce ee ee eed ed aed ed ae ad od ed 
WALD 
N28 


:DELAY 


1$ 

000400 172552 MENDDMA ,aSFR :STOP DMA TRANSFERS 

000002 172544 HTESTZ,aSFR ;STOP ' NPUTS 
12 sAFTER A GROSS TIME, THE Z/WC OVERFLOW FLOP FAILED TO SET 
5$ TO CLEAN UP 


WC/Z OVERFLOW INTERRUPT BIT AND WAIT FOR AN INTERRUPT 
000000 : #0,-(SP) 
007230 #3$,-(SP) ;LSI-11 HACK 


007274 172534 3$: #4$ ,aVECTAO ;LOAD INTR. VECTOR 
000100 172502 #B1T6,aCSR ENABLE INTERRUPT 


172466 001126 aCSR,$BDDAT ;READ STATUS 

004000 172466 #CLRALL,@SFR :CLEAR THE DEVICE 
13 zWC/Z OVERFLOW FAILED TO GENERATE INTERRUPT 
5$ ;7BR TO CLEAN UP 


(SP)+, (SP)+ 
172444 : acsR 
172446 ACLRALL ,@SFR CLEAR THE DEVICE 


004000 
001774 172454 VECTA1 ,aVECTAO 
005077 172452 aveCTAi 
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CZNCCA.P11 T30 VERIFY *WCA OVFL'* CLEARS ‘ACTIVE’ 


SII UIOISIOISISISISIIISIOIOISIIOIUIIUISIDIOITIOI III ITI TOT TTT TTT TTT 
SRTEST 30 VERIFY 'WCA OVFL’' CLEARS ‘‘ACTIVE"’ 
PAIRS IOICISIISISIOISIIOIUISIICIOI UIC ICICI IIIS TIO TTT TOT TTT TOE 
S130: 

000010 MOV #10, $TIMES 3:D0 10 ITERATIONS 
004000 AMCLRALL ,@SFR 
#TSTDMA! TSTCON,@SFR 
#-1, ot 
172372 #2. @BA 
@OF F 


172352 #B1T4!B1T1,aCSR 
#BITO,aCSR 
#TESTZ,ASFR 
MTESTZ,@SFR DISABLE "TEST Z°* PULSES 
CSR, $BDDAT ;READ STATUS 
#B1Ti4'B114'BIT1, SGDDAT ;LOAD EXPECTED 
001124 001126 + ameaie - SBDDAT on wr i — 


1 AME 
12 :'WCA OVFL'’ FAILED TO CLEAR ‘‘ACTIVE'’ 
TST31 sé 


001124 : SGDDAT ;CLEAR THE EXPECTED 
172272 001126 a0FF , S$8DDAT sREAD THE ACTUAL 
TST31 72BR IF CLEARED 
12 :'WCA INC X OFF'' IN MATRIX MODE CHANGED 
THE OF FSET REGISTER 


1381 
1382 
1383 
1384 
1385. 
1386 
1387 
1388 
1389 
1390 
1391 
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CZNCCA.P11 T31 VERIFY JOYSTICK DONE FLOP SETS 


3 FI II IIIT I III TTT TIC TOT TT ITE ITT TTI IIIT IT ITI TIT TIT TIT ITT IAT 
z*TEST 31 VERIFY JOYSTICK DONE FLOP SETS 
PRE AREEALALAEAACALAALACALAAEALASALALASASEAESLASESARASERS EERE ESAS A SESE SS 
7131: SCOPE 
001160 MO #40, $TIMES ::D0 40 ITERATIONS 
172254 :CLEAR THE DEVICE 
172246 REQUEST JOYSTICK DATA 
MOV 1,R0 :LOAD DELAY COUNTER 
172236 : SFR sWAIT FOR JOYSTICK READY 
BM 2 = = IF SET 
1$ :BR iF NOT EXHAUSTED 
172224 001126 aSFR,$BDDAT READ STATUS 
000200 001124 MOV #B1T7,$GDDAT LOAD EXPECTED 
ERROR 14 ‘JOYSTICK READY’’ FAILED TO SET 
:NOW PERFORM A ''TST’’ INSTRUCTION TO THE JOYSTICK REGISTER 
THE ACCESS OF THIS BUS ADDRESS SHOULD CLEAR JOY READY FLOP’ 
172212 5s: TST auOY ADDRESS THE REGISTER 
172202 001126 aSFR, SBDDAT “READ STATUS 
001126 $BDDAT TEST IF THE BIT CLEARED 
:7;BR IF YES 
001124 LOAD EXPECTED 
sADDRESSING THE JOYSTICK ADDRESS FAILED TO CLEAR 
bg ; SP RREAAAALEALALACACLALALALAAARASASZASASAAEASALESASALALALA SELES AAAS SE SS 
z*TEST 32 VERIFY THAT ‘RESET’’ INSTRUCTION CLEARS THE JOY READY FLOP 
4 2 PRRERCAAAEALAAZAECZASCASCASCAAASASAASAESESAESZASALALEL ESE E SS ESE SEER SS SESS SE SS 
TST32: 
001160 MO #40, $TIMES :2D0 40 ITERATIONS 
172146 MO #CLRALL,@SFR CLEAR THE DEVICE 
172140 #REDJOY,aSFR ;REQUEST JOYSTICK DATA 
CPUDL1,RO ZLOAD DELA 
172130 : asFR ‘WAIT FOR JOYSTICK READY 
2$ 7BR IF SET 
RO ; DELAY 
1$ :BR IF NOT EXHAUSTED 
172116 001126 @SFR,$BDDAT READ STATUS 
000200 001124 MO #B1T7,$GDDAT :LOAD EXPECTED VALUE 
ERROR 14 JOY READY FAILED TO SET 
:NOW ISSUE A ‘CLR ALL’* AND VERIFY THE yby READY'’* DOES NOT CLEAR 
172076 2$: BIS #CLRALL, asFR GENERATE ‘‘CLR ALL’ 
aSFR,$BDDA :READ STATUS 
#BIT7, SCDDAT :LOAD EXPECTED VALUE 
001124 001126 $GDDAT , $BDDAT : COMPARE 
3$ 7:BR IF SAME 
ERROR 14 :"'CLR ALL'' CLEARED THE ‘JOY READY’ FLOP IN ERROR 
gow ISSUE A BUS ‘'RESET'' AND VERIFY THE JOY READY CLEARS 


172042 001126 MOV aSFR,$BDDAT [READ STATUS 
000000 001124 #0, $GDDAT ‘LOAD EXPECTED 
172026 001126 aSFR, $BDDAT SREAD STATUS 
TST33 ::BR IF CLEARED 
104014 14 :BUS INIT FAILED TO CLEAR JOY READY 





ory 
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CZNCCA.P11 T32 VERIFY THAT ‘RESET’ INSTRUCTION CLEARS THE JOY READY FLOP 


FFARR ARERR ERR ERE EERE ERE EERE EERE 
s*TEST 33 JOYSTICK DATA PATH = GAIN =0 ZB ENABLE =0 RES. = 
FLERE EEE EERE EEE ERE KEK REE REE REREREREREER EEE 
TST33: 
#10, $TIMES 3:D0 10 ITERATIONS 
ACLRALL ,@SFR ;CLEAR THE DEVICE 
ATSTCON! TSTDMA,@SFR ;SET TEST CONTROLLER FLOP 
#0,aCSR ;LOAD CSR REGISTER 
000001 Is #REDJOY,aSFR ;REQUEST JOYSTICE DATA 
171754 : aSFR sWAIT FOR JOYSTICE READY 


1$ 
171752 1126 aJOY,$BDDAT READ THE REGISTER 
000000 #0, $GDDAT ;LOAD EXPECTED 
001124 001126 SGDDAT , SBDDAT ; COMPARE 
TST34 ;;BR IF SAME 
15 ; JOYSTICK DATA PATH BIT SET 


ARERR REE EERE EKER REE REE EEKEEEEREKEKEEKEEKREKEKEKEEKEEEEE 


S*TEST 34 JOYSTICK DATA PATH = GAIN =1 


J ARERR EERE REE KEKE EKEEKEEKEEEKEEKEKEEEEKEKEEEEKEEEKEREE 


TST34: 
#10, $TIMES 3:D0 10 ITERATIONS 
#CLRALL ,@SFR ;CLEAR THE DEVICE 
ETA cA sami ;SET TEST CONTROLLER FLOP 
#2000,aCS ;LOAD CSR REGISTER 
#REDJOY, SSFR sREQUEST JOYSTICE DATA 
ie ;WAIT FOR JOYSTICE READY 


$ 
171656 aJOY,$BDDAT sREAD THE REGISTER 
124250 #124250, $GDDAT ;LOAD EXPECTED 
001124 001126 SGDDAT ,. S$BDDAT >; COMPARE 
TST35 ;;BR IF SAME 
010124 15 s JOYSTICK DATA PATH ERROR 


DISS ISIIIOISIIIOISIIDIIISIISIIOIIOIIOICIDIOI IOI IOI TOI IOI TOI TOR TOT TOT TOT TT IT ISIS IS 
s*TEST 35 JOYSTICK DATA PATH = ZB ENABLF =1 
DDSI IIISIIOIIIOIIISIISIOIIIIIOIIIOICIOIOI ITI IR TTT IAAI AIA IA ISASAS SASS. 
010126 000004 TST35: 
000010 001160 MO #10,$TIMES 3:D0 10 ITERATIONS 
004000 #CLRALL aSFR :CLEAR THE DEVICE 
#TSTCON! TSTDMA, aSFR ;SET TEST CONTROLLER FLOP 
#4000,aCSR ;LOAD CSR REGISTER 
171570 #REDJOY ,ASFR SREQUEST JOYSTICE DATA 
: @aSFR sWAIT FOR JOYSTICE READY 


1$ 
171562 001126 aJOY,$BDDAT READ THE REGISTER 
050120 001124 #050120, $GDDAT ;LOAD EXPECTED 
001124 001126 S$GDDAT , $BDDAT ; COMPARE 
1401 TST36 73;BR IF SAME 
010220 15 JOYSTICK DATA PATH ERROR 
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010314 
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1401 
104015 


000001 
171470 
171466 


000401 
001124 


000010 
004000 
000014 
000025 
000001 
171374 
171372 


001002 
001124 


000010 


171276 
002004 
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001160 


171400 


001126 
001124 
001126 


001126 
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SRR RRR EERE RRR ERE REE IEKEEREERER EKER ERE ER ER 


s*TEST 36 


JOYSTICK DATA PATH RES. 


= 001 


pla hekahahahahalehahehehahelelahelahahelehahehaiahalaiaialeheiehehelsisielaheisleheislaheleleheilshelsieheieleisicheieieleielel 


TST36: 


#10, he 
#CLRALL ,@SFR 
PTSTCON!TSTDMA, @SFR 


#23,aCSR 
#REDJOY ,aSFR 
@SFR 


1$ 
@JOY , $BDDAT 
#401, $GDDAT 


33D0 10 ITERATIONS 


;CLEAR THE DEVICE 
;SET TEST CONTROLLER FLOP 
[LOAD CSR REGISTER 


SREQUEST JOYSTICE DATA 
sWAIT FOR JOYSTICE READY 


READ THE REGISTER 
LOAD EXPECTED 


SGDDAT , SBDDAT : COMPARE 
TST37 ;;BR IF SAME 


15 


; JOYSTICK DATA PATH ERROR 


RRR KEE EEE KKEKEEEKEEKEEERKKEEKEEEKKEKKEKKEEKEKEKE 


teTEST 37 


JOYSTICK DATA PATH RES. 


= 010 


FLARE RRR EEE EER REE ERE KEK EERE ERE ERE EERE EEE 


tST3S7s 


#10, $TIMES 
#CLRALL ,aSFR 
#TSTCON! TSTDMA, aSFR 


#25,aCSR 
#REDJOY ,@SFR 
@SFR 
1$ 
aJOY,$BDDAT 
#1002, $GDDAT 
S$GDDAT , $BDDAT 
ae 


3:D0 10 ITERATIONS 


;CLEAR THE DEVICE 
7SET TEST CONTROLLER FLOP 
;LOAD CSR REGISTER 


SREQUEST JOYSTICE DATA 
sWAIT FOR JOYSTICE READY 


READ THE REGISTER 
LOAD EXPECTED 
; COMPARE 


BR IF SAME 
: JOYSTICK DATA PATH ERROR 


RRR EEEEEKEEKKKKEEEEKEEKEKKEKRKEEKEKEKEEKEKEEKKEEKEEKEEEK 


S*TEST 40 


JOYSTICK DATA PATH RES. 


= 100 


SLEEK REE EKER ERE EE 


TST4O: 


#10,$TIMES 
ACLRALL ,@SFR 
#TSTCON! TSTDMA, aSFR 
#31,aCSR 

#REDJOY ,@SFR 

@SFR 

1$ 

aJOY,$BDDAT 
#2004 , SGDDAT 


3:DO0 10 STeAT IES 


:CLEAR THE DEVICE 

:SET TEST CONTROLLER FLOP 
;LOAD CSR REGISTER 
TREQUEST JOYSTICE DATA 


[WAIT FOR JOYSTICE READY 


READ THE REGISTER 
LOAD EXPECTED 


$GDDAT , $BDDAT >; COMPARE 
TST41 :7BR IF SAME 


15 


;JOY STICK DATA PATH ERROR RES. = 100 
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0107 
010770 


DIAGNOSTIC 


T41 


000010 
004000 


171202 
000401 
001124 


000001 
171110 


171106 
130260 
001124 


000001 
171014 


171012 
177777 
001124 
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INCREMENT FUNCTION 


PRS kt td tk kh kaha kak Sedaka lake halekahahahahelahalelahehehehelaiaheleheheleleheisisieleheisleleisieieisisieieicielel 


s*TEST 41 


VERIFY THE DATA INCREMENT FUNCTION 


Pk katt k kkk Skah ka hahha hale ke ha hakalala hale lahalehahalahelelohehelahehelehelelehelelaialeinieicisisieiaieieleielel 


TST41: 


#10,$TIMES D0 10 ITERATIONS 

ACLRALL ,@SFR ;CLEAR THE DEVICE 
ATSTCON! TSTDMA,@SFR SET TEST CONTROLLER FLOP 
#421,aCSR [LOAD CSR REGISTER 

#REDJOY ,ASFR SREQUEST JOYSTICE DATA 
he WAIT FOR JOYSTICE READY 


aJOY,$BDDAT READ THE REGISTER 

#401,$GDDAT ;LOAD EXPECTED 

S$GDDAT , $BDDAT ; COMPARE 

TST42 3;3BR IF SAME 

16 MAINT. CAMO1 FAILED TO INCREMENT DATA REGISTER 


FI RIKER EERE AKER EEE REE EERE EERE EERE KEE 


TRTEST 42 


VERIFY THE DATA INCREMENT CARRY BIT 


SEEK KEKE EEK KEEKEEEKEEKEKKEEKKEKEEEREKREKEEREKKEEKEREKEKKEKEEKKEKE 


$142: 


#10,$TIMES 3:D0 10 ITERATIONS 

#CLRALL ,aSFR ;CLEAR THE DEVICE 
#TSTCON!TSTDMA, aSFR ;SET TEST CONTROLLER FLOP 
#2437 ,acs ;LOAD CSR REGISTER 
PREDJOY (aSFR ZREQUEST JOYSTICE DATA 
he sWAIT FOR JOYSTICE READY 


aJOY, $BDDAT READ THE REGISTER 

#130260, $GDDAT ;LOAD EXPECTED 

$GDDAT , $BDDAT ; COMPARE 

TST43 72BR IF + 

16 MAINT. CAMO1 WITH RES.=7, G=1, ZB =0 
FAILED TO CAUSE DATA INCREMENT CARRY PROPERLY 


LARK REE REE EEE ER EKEREREREREREKEEKEEEEKEEREKEEKREEEEEEERERE EK 


z*TEST 43 


VERIFY THE DATA INCREMENT FUNCTION IS INHIBITED 


LEER ERE ERE ERE REE EREKKKREREEREEEEREREREREKEREREREEEK 


TST43: 


#10, $TIMES 32:DO0 10 ITERATIONS 

ACLRALL ,@SFR :CLEAR THE DEVICE 
ATSTCON! TSTDMA,@SFR :SET TEST CONTROLLER FLOP 
#6437 ,aCSR ;LOAD CSR REGISTER 

#HREDJOY ,ASFR SREQUEST JOYSTICE DATA 
@SFR zWAIT FOR JOYSTICE READY 


QJOY, $BDDAT :READ THE REGISTER 

#177777, $GDDAT [LOAD EXPECTED 

$GDDAT , $BDDAT * COMPARE 

TST44 7;BR IS SAME 

16 ‘FAILED TO INHIBIT DATA INCREMENT FUNCTION 
[IF THE BAD DATA WAS 0 





fale 


K 4 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG-78 15:05 PAGE 37 
CZNCCA.P11 T44 VERIFY THE DATA DECREMENT FUNCTION 


FL RR ERE ERI I IRAE TER 


s*TEST 44 VERIFY THE DATA DECREMENT FUNCTION 


SRE REE REE ER ERE EERE REE EERE EERE REE ERE REE KEE EERE EE 


010772 000004 TST44: 
daft get: 3;D0 10 ITERATIONS 
CLEAR THE DEVICE 
:SET TEST CONTROLLER FLOP 
Cc ;LOAD CSR REGISTER 
000001 170724 #REDJOY, @SFR ZREQUEST JOYSTICE DATA 
170720 : 7 ;WAIT FOR JOYSTICE READY 


BP $ 
170716 001126 aJOY, a READ THE REGISTER 
000000 001124 #0, $GDDAT ;LOAD EXPECTED 
001124 001126 ScDDAT. - SBDDAT ; COMPARE 


3;BR IF SAME 
17 zIF DATA WAS 401, THE DATA DECREMENT FUNCTION FAILED 
OTHERWISE DECREMENTED DATA ERROR 


J LARA E EERE REE EEEREEEEEEKKEEEKREREKEERERRERER 


i*TEST 45 VERIFY THE DATA DECREMENT BORROW 


5 LARA EE ERE EERE KEEREREEEREREEEREEEERRERE 


TST45: 


#10, STIMES 3:D0 10 Sopris 

#CLRALL ,aSFR CLEAR THE DEVICE 
HTSTCON!TSTOMA, @aSFR :SET TEST CONTROLLER FLOP 
#7037,aCS ;LOAD CSR REGISTER 

PREDJOY /aSFR SREQUEST JOYSTICE DATA 
te [WAIT FOR JOYSTICE READY 


001126 QJOY, SBDDAT :READ THE REGISTER 
001124 #177376, $GDDAT [LOAD EXPECTED 
001126 $GDDAT , $BDDAT * COMPARE 

TST46 77BR IF SAME 

17 7DECREMENTED DATA ERROR 


FL ARERR ERE EE EEEEEKREREEEEKEEKEEKEEEREKEEREEEREREREREREEREE 


z*TEST 46 VERIFY THE DATA DECREMENT FUNCTION IS INHIBITED 


LL AAA RRR ARERR EEEEEEREEKEEEKEEEEREEKEEREEEEKREEKEEEKREREEE 


TST46: 
#10, STIMES ::D0 10 ITERATIONS 
MCLRALL ,@SFR :CLEAR THE DEVICE 
#TSTCON! TSTDMA, aSFR :SET TEST CONTROLLER FLOP 
#1021,aCSR ;LOAD CSR REGISTER 
000001 I #REDJOY ,@SFR SREQUEST JOYSTICE DATA 
170530 : ore :WAIT FOR JOYSTICE READY 


BPL $ 
170526 aJOY , SBDDAT READ THE REGISTER 
000000 . SGDDAT ;LOAD EXPECTED 
001124 ; COMPARE 
S147 33 SAME 
011254 7 ; INHIBIT DECREMENT FUNCTION ERROR 
;IF DATA WAS 177777 
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CZNCCA.P11 147 TEST ADDRESS MAKER = MATRIX MODE = RES = 7 GAIN = 0 ZB 


ENABLE = 0 


FARRER REE REE REE EERE ERE REE EERE REE EERE EERE EERE ER 


ATEST 47 


TEST ADDRESS MAKER = MATRIX MODE = RES = 


7 GAIN = 


RARER EEE EEE EKER EEEKKEKKEEEEEEKEEKEKEEREKEEKEKRREKEKEEEKKKKKE 


011256 000004 $147: 
#10,$TIMES 
#CLRALL ,@SFR 
#TSTDMA'TSTCON, aSFR 
#36,aCSR 
#TESTZ,aSFR 
#BITO,acSR 
#TESTZ,aSFR 
@ADM, SBDDAT 
#3407, $GDDAT 
SGDDAT ,SBDDAT 
TST5O 
20 


33D0 10 ITERATIONS 
sCLEAR DEVICE 


zSET ‘‘TEST DMA AND CONTROL’’ 
;LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
; ENABL 2'* PULSES 


;READ THE ADDRESS DATA MAKER 

;LOAD EXPECTED VALUE 

; COMPARE EXPECTED TO READ 
77BR IF SAME 


; INCORRECT ADDRESS MAKER DATA 
7B ENABLE = 0 


RESOLUTION = 7 GAIN = 0 


LARA REE EREEEREEEEEEREEREEEREREEREREREEERERERERERRERREEEE 


TRTEST 50 


TEST ADDRESS MAKER = MATRIX MODE - RES = 


7 GAIN = 


TTT Titi titi titi titi iti t ii iiiiiiiiititiiitttiiiitii iii 


TST5SO: 
#10, STIMES 


TO,aCSR 
#TESTZ SFR 
@ADM, SBDDAT 
#127657, SGDDAT 
SGDDAT , SBDDAT 

TST51 
20 


3:D0 10 ati ban bee 


AR_DEVICE 
zSET “‘TEST DMA AND CONTROL" 
LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
TENABLE ‘TEST, 2° PULSES 
:SET ENABLE NCV11 
: DISABLE Test z** PULSES 
;READ THE ADDRESS DATA MAKER 
;LOAD EXPECTED 


VALUE 
= COMPARE EXPECTED TO READ 
77BR IF SAME 


; INCORRECT “yo tes y DATA 


RESOLUTION = 7 GAIN = 1 ZB ENAB 


° 
[RARER EEKEEEEREREREEKEEEEEEEEERREEKREERERKEEKER 


TATEST 51 


TEST ADDRESS MAKER = MATRIX MODE ~ RES = 7 GAIN = 


0 ZB ENABLE 


DUBAI SEIU IETS IOUS SIONS SIO IOS IOI RI i tot itt 


TST51: 

#10, STIMES 
ACLRALL -@SFR 
#ISTDMAITSTCON, aSFR 
#4036.a 

*TEST? aSFR 
#B1ITO,aCSR 
MTESTZ,@SFR 


@ADM, SBDDAT 
#053527, S$GDDAT 
SGDDAT, $BDDAT 
E TST52 
011562 20 


3:D0 10 I 
CLE 


TERATIONS 
AR_DEVICE 


*SET ‘TEST DMA AND CONTROL"’ 


sLOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
2'* PULSES 


* PULSES 
AD THE ADDRESS DATA MAKER 
‘TOAD EXPECTED VALUE 
; COMPARE EXPECTED TO READ 


72BR IF SAME 


; INCORRECT ADDRESS —_ DATA 


RESOLUTION = 7 GAIN = 0 ZB ENABLE 


0 ZB ENABLE = 


1 7B ENABLE = 


SEQ 0050 


Cc 


0 


= 1 
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CZNCCA.P11 TEST ADDRESS MAKER = MATRIX MODE = RES = 6 GAIN = 0 ZB ENABLE = 0 SEQ 0051 


meno ge- taal ggasi ttle interna sagilr = alee 


;*TEST 52 TEST ADDRESS MAKER = MATRIX MODE - RES = 6 GAIN = 0 ZB ENABLE = C 


5 RARER ERR EERE EERE EERE ERE ERERRRREEERERE REE EERE EERE 


TSTS2: 
#10, STIMES 7zD0 10 ITERATIONS 
#CLRALL ,a@SFR ; CLEAR DEVICE 
#TSTDMA!TSTCON, aSFR SET ‘TEST DMA AND CONTROL" 
#34,aCSR ;LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
ATESTS aSFR TENABLE ‘TEST 2°' PULSES 
#B1ITO,aCSR sSET ENABLE NCV11 
MTESTZ,A@SFR “DISABLE ‘TEST 2°* PULSES 
@ADM, SBDDAT [READ THE ADDRESS DATA MAKER 
#1406,$GDDAT ;LOAD EXPECTED VALUE 
SGDDAT , SBDDAT : COMPARE EXPECTED TO READ 
TST52 77BR IF SAME 
20 : INCORRECT ADDRESS MAKER DATA 
3 RESOLUTION = 6 GAIN = 7B ENABLE = 
J LRA RRR REE EE ER EEE EERE EERE ER ERREREEREEEE EER EERE EEE 
S*TEST 53 TEST ADDRESS MAKER - MATRIX MODE - RES = 6 GAIN = 1 ZB ENABLE = 0 


SRR ERE REE EER ERERE REE EER EEE EEE RE ERE REE ERERREEE EER 


TST53: 

#10, $TIMES ::D0 10 ITERATIONS 

ACLRALL.@SFR CLEAR DEVICE 

#TSTDMATSTCON, asFR [SET ‘TEST DMA AND CONTROL"' 

#2034,aCS LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 

*TEST? oSFR ‘ENABLE "TEST 2'* PULSES 

#BITO,acsR SET ENABLE NCV11 

ATESTZ,aSFR SDISABLE ‘TEST Z'* PULSES 

@ADM, SBDDAT “READ THE ADDRESS DATA MAKER 

#53656, $GDDAT SLOAD EXPECTED VALUE 

$GDDAT. SBDDAT *COMPARE EXPECTED TO READ 

TST54 ::BR IF SAME 

20 : INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 6 GAIN = 1 ZB ENABLE = 0 


FRR RERERERAEEEEEEEEREREREREEEEEEEEEEEEEEEEEEEEEERERERERERER EH 


ATEST 54 TEST ADDRESS MAKER = MATRIX MODE - RES = 6 GAIN = 0 ZB ENABLE = 1 


2 KEKE EERE EEEEEEEKEEKKEEEEKEKEEEEREKEREEKEEREKEKEEEAKRKKEKEKE 


18154: 
#10, STIMES 3;D0 10 ITERATIONS 
#CLRALL ,@SFR : E 
#TSTDMALTSTCON, aSFR 2SET AND CONTROL" 
#4034 ,aCS LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
#TESTEaSER ze oe 2’ PULSES 
#B1TO,aCSR 


ATESTZ,aSFR : ES 
@ADM, SBDDAT SREAD THE ADDRESS DATA MAKER 
#125526, $GDDAT [LOAD EXPECTED VALUE 
$GDDAT , $BDDAT *COMPARE EXPECTED TO READ 
012066 E TST55 ::BR IF SAME 
012070 20 | : INCORRECT ADDRESS MAKER DATA 
. RESOLUTION = 6 GAIN = 0 ZB ENABLE = 1 


Sac 
N 
ee 
ooo°o°o— 
= 
Ww 


“"OD0dONOUSWN—O 
YNNSYNS 


S 
So 
—s 
Nw 
oO 


eee ced ed ed aed ad od od od 
gg 
— 
Mn 
as 


8] 


ee ee ee ee ee ee 
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NNRRID 


ee ee ce ee a ce ee ee cd ed ed ed 
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ne 
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CZNCCA.P11 TEST ADDRESS MAKER = MATRIX MODE = RES = 5 GAIN = 0 ZB ENABLE = 0 SEQ 0052 


DDR E IEEE ICIS III III IIIISIIOIIIIIIIOIII III TT TTT TE 
3*TEST 55 TEST ADDRESS MAKER = MATRIX MODE - RES = 5 GAIN = 0 ZB ENABLE = C 
SDS EIEIO OSI ISDS I AISISIIISISIOIIIIOIOIOIOIOISIOIOIDISIOIOI III TTT TT I TIE 
012072 000004 TST55: 

#10, $TIMES 33D0 10 ITERATIONS 
#CLRALL ,aSFR 3 EVICE 
#TSTDMA! TSTCON, @SFR ; SET AND CONTROL"* 
#32,aCS sLOAD RESOLUTION, GAIN, 7B ENABLE VALUE 
#TESTZ.@SFR s€ 2'* PULSES 


#B1T0,acs 
#TESTZ,A@SFR : 
@ADM, SBDDAT *READ THE ADDRESS DATA MAKER 
#402 ,,$GDDAT ;LOAD EXPECTED VALUE 
SGDDAT , SBDDAT ; COMPARE EXPECTED TO READ 
E TST56 77BR IF SAME 
012172 20 ; INCORRECT ADDRESS MAKER DATA 
: RESOLUTION = 5 GAIN = 0 ZB ENABLE = 0 


[RARER EREEEEREKEEREREREREEEEREEEKEKKEEEEERKEEEEEEKKEEKEEEKK 


ZATEST 56 TEST ADDRESS MAKER = MATRIX MODE ~- RES = 5 GAIN = 1 ZB ENABLE = 0 


FERRER EEEEEEEEKAEEEREEKEEEEEEEEEEEKEEREKEKEEEKEEKEREK 


012174 000004 18156: 
#10, STIMES 3:D0 10 ITERATIONS 
#CLRALL ,aSFR ;CLEAR_DEVICE 
AISTONA!TSICON, @aSFR 3SET *‘TEST DMA AND CONTROL" 
#2032,aCS sLOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
PTESTE OSFR PULSES 
1T0,a@CSR 


AB 
#TESTZ,aSFR : E ‘TE SES 
@ADM, SBDDAT [READ THE ADDRESS DATA MAKER 
#25526, $GDDAT [LOAD EXPECTED VALUE 
SGDDAT . SBDDAT SCOMPARE EXPECTED TO READ 
TST57 37BR IF SAME 
012274 20 ; INCORRECT ADDRESS MAKER DATA 
: RESOLUTION = 5 GAIN = 1 ZB ENABLE = 0 
J FARRER AEE AREKREEEEDEREEAEREREKEEKEEREREEEEREEEEKKEEEREEKEKEE 
=*TEST 57 TEST ADDRESS MAKER = MATRIX MODE - RES = 5 GAIN = 0 ZB ENABLE = 1 


SEEKER EEEREKEEKEEEEEKEEEEREERKEKEERAEKEKEKEEKEEKKEEKEKKKE 


012276 000004 TST57: 
012300 #10, STIMES 7:D0 10 ITERATIONS 
: CLEAR DEVICE 
7SET ‘'TEST DMA AND CONTROL" 
LOAD RESOLUTION, GAIN. 7B ENABLE VAL 


#TESTZ @SF A 


@ADM 
oo oas2° SCDDAT ED 
SGDDAT , SBDDAT >COMPARE EXPECTED TO READ 
TST60 77BR IF SAME 
012376 20 : INCORRECT ADDRESS MAKER DATA 
: RESOLUTION = 5 GAIN = 0 ZB ENABLE = 1 


1779 
1780 
1781 
1782 
1783 
1784 
1785 
1786 
1787 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
1797 
1798 
1799 
1800 
1801 
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CZNCCA.P11 T60 TEST ADDRESS MAKER = MATRIX MODE = RES = 4 GAIN = 0 ZB ENABLE = 0 SEQ 0053 


1802 tC a ng ae inmate aaa iene emg cn gr me tata a pes 
1803 :*TEST 60 TEST ADDRESS MAKER = MATRIX MODE - RES = 4 GAIN = 0 ZB ENABLE = C 
SLR RRR REE ERE ER EER EER EERE ERE EERE ERE RR EERERERE REE 
TST60: 
001160 MO #10, tg? 3:D0 10 ITERATIONS 
ACLRALL ,@SFR ; CLEAR DEVICE 
aTSTDMAITSTCON, aSFR SET “TEST DMA AND CONTROL" 
#30,aCSR LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
ATESTZ,aSFR ENABLE ‘‘TEST 7°” PUL SES 
#B1T0,aCSR + SI ENABLE NCV11 
aby & @SFR *DISABLE “TEST Z'* PULSES 
@ADM, $BDD DDAT SREAD THE ADDRESS DATA MAKER 
#202. SGDDAT SLOAD EXPECTED VALUE 
001124 001126 $GDDAT, SBDDAT : COMPARE EXPECTED TO READ 
TST61 ;;BR IF SAME 
20 ; INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 4 GAIN = 0 7B ENABLE = 0 
J III I IT III III IKI IKE HIKER KEKE EKER KERR ER ERE 
*STEST 61 TEST ADDRESS MAKER = MATRIX MODE - RES = 4 GAIN = 1 ZB ENABLE = 0 
1A RC RIC RII IRCCS IIIS IIS ISIS SSIS SSIS SSSA IAA 
TST61: 
000010 001160 MOV #10, $TIMES ::D0 10 ITERATIONS 
004000 MCLRALL ,@SFR ;CLEAR DEVICE 
#TSTDMA! TSTCON,@SFR :SET ‘'TEST DMA AND CONTROL" 
SR ;LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
sENABLE ‘‘TEST Z'* PULSES 
TO,aCSR SSET ENABLE NCV11 
ATESTZ, aSFR ;DISABLE ‘TEST 2°’ PULSES 
@ADM, $BDD DAT “READ THE Oren uk DATA MAKER 
#012726, $GDDAT ;LOAD EXPECTED VALUE 
001124 001126 SGDDAT , SBDDAT >; COMPARE EXPECTED” TO READ 
TST62 72BR IF SAME 
20 ; INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 4 GAIN = 1 ZB ENABLE = 0 
FERRER REE KEE KEKE EERE EEKEKEKREEKEKEEEEREEREEEE RE 
*STEST 62 TEST ADDRESS MAKER = MATRIX MODE - RES = 4 GAIN = O ZB ENABLE = 1 
KEKE KEKE EKREEKEEEEKEEEKEEKKEREKKEEKEEKEKEKKEKK 
i162: 
000010 001160 MO #10, te = ::D0 10 ITERATIONS 
ACLRALL,@ ; CLEAR DEVICE 
aye MMATTSTCON, aSFR SET “TEST DMA AND CONTROL" 
LOAD rere’ mn ist ZB ENABLE VALUE 


88 


Sas 


ee cee ce el ce ae cd ae cae ce a ceed cad ed eed ed ad cd 
0 ee et Pt bet et ber Se ee be bet 
WO DONAUSWN—O 


;READ THE ADDRESS DATA MAKER 
;LOAD EXPECTED VALUE 
001124 001126 $GDDAT , $BDDAT ;COMPARE EXPECTED TO READ 
TST63 7 BR IF SAME 
20 ; INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 4 GA IN = 0 ZB ENABLE = 1 
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CZNCCA.P11 163 TEST ADDRESS MAKER = MATRIX MODE - RES = 3 GAIN = 0 ZB ENABLE = 0 SEQ 0054 


MPR RRARAALALABAAAAAAAALAAASAAASASEASEASAASASLE LARS S SARE A AAAS ESAS SE SG 
tSTEST 63 TEST ADDRESS MAKER = MATRIX MODE - RES = 3 GAIN = 0 ZB ENABLE = C 
EERE KERKEREERKEEEKE 
7163: 
000010 MO #10, $TIMES ::DO0 10 ITERATIONS 
ACLRALL,aSFR CLEAR DEVICE 
ATSTDMA! TSTCON, aSFR ‘SET ''TEST DMA AND CONTROL"’ 
#26,aCSR * LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
are ican” sENABLE My Z’ PULSES 
#B1T0,a eSET ENABLE N cv11 
resto" te = DISABLE HESS Z*' PULSES 
@ADM, SBDDA T “READ THE ADDRESS DATA MAKER 
000000 #0, $GDDAT ;LOAD EXPECTED VALUE 
001124 001126 SGDDAT , $BDDAT :COMPARE EXPECTED TO READ 
TST64 ;:BR IF SAME 
20 legen ag ADDRESS MAKER DATA 
RESOLUTION = 3 = 0 ZB ENABLE = 0 
AES ae LRT ee A ieee nadia Rte Rte Te Retr se Po BP 
tSTEST 64 TEST ADDRESS MAKER - MATRIX MODE - RES = 3 GAIN = 1 ZB ENABLE = 0 
TR RR III CII III IIIS IIIS IIIS SSSI ISSSSSSSAS SSAA. 
TST64: 
000010 001160 MO #10, $TIMES ::DO 10 ITERATIONS 
ACLRALL ,@SFR LEAR DEVICE 
#TSTDMAITSTCON, asFR =SET ‘TEST DMA AND CONTROL" 
#2026,aCS = LOAD RESOLUTION, re ZB ENABLE VALUE 
FTEST? OSFR S 
#B1T0O,aCSR 
#TESTZ,aSFR 
@ADM, $BDDAT 
#5252, $GDDAT ED VALUE 
001124 001126 SGDDAT , SBDDAT z COMPARE EXPECTED TO READ 
TST65 7 2BR IF SAME 
20 : INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 3 GAIN = 1 ZB ENABLE = 0 
REE KERERE REE KEKE REE 
*STEST 65 TEST ADDRESS MAKER - MATRIX MODE - RES = 3 GAIN = 0 ZB ENABLE = 1 
UIA IOI IOI II OI IOIIOICISI IOI IIOIOICIOIOI III TOIT TI TTT TT TT I TTT TIE 
TST65: 
000010 001160 MO #10, $TIMES ::D0 10 ITERATIONS 
004000 #CLRALL,@SFR 3 
ATSTDMA'TSTCON, aSFR : AND CONTROL" 
#4026,aCSR ;LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
ATESTZ,@SFR * ENABLE “TEST Z°* PUL SES 
SET ENABLE NCV11 
‘DISABLE “TEST Z°* PULSES 
sREAD THE reece DATA MAKER 
. ;LOAD EXPECTED VALUE 
001124 001126 SGDDAT , $BDDAT >; COMPARE. PECTED. TO READ 
TST66 ::BR IF SAME 
013212 20 s INCORRECT ADDRESS MAKER DATA 
. RESOLUTION = 3 GAIN = 0 7B ENABLE = 1 
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MATRIX MODE = RES = 2 GAIN = 0 ZB ENABLE = 0 


FI III IIT IT TIT TTT ITT TOT TTR IR ITT IR IST TOTTI ITT IAAI TIS IIIA II 


SSTEST 66 TEST ADDRESS MAKER = MATRIX MODE = RES = 2 GAIN = 


RKC KEEEREKEEEKEEERERKEEKKEKKKH 


iST66: 
#10,$TIMES 3:;D0 10 ITERATIONS 
ACLRALL -@SFR : CLEAR DEVICE 
FTSTDMALTSTCON, aSFR SET ‘'TEST DMA AND CONTROL" 
#24 ,aCSR sLOAD RESOLUTION, GAIN, 7B ENABLE VALUE 
ATESTZ,aSFR * ENABLE “TEST Z°* PULSES 
#B1T0,aCSR ;SET ENABLE NCV11 
MTESTZ,ASFR ;DISABLE ‘‘TEST 2°’ PULSES 
@ADM, $SBDDAT ;READ THE ADDRESS DATA MAKER 
#0, $GDDAT ;LOAD EXPECTED VALUE 
SGDDAT , SBDDAT * COMPARE EXPECTED TO READ 
i. ;;BR iF SAME 


pe ange ADDRESS MAKER DATA 
RESOLUTION = 2 = 0 ZB ENABLE = 0 

EES ARIST emake Bok inte Ms A ostre - Rede BD 

TRTEST 67 TEST ADDRESS MAKER - 


{UIE SISSIES SIOIIIUIOISICISICI SII IOC IOI TOIT TTT TT TT TT TT TT TT ITT TE 


TST67: 
#10, $TIMES 3:D0 10 ITERATIONS 
ACLRALL ,@SFR ; . DEVICE 
T "'TEST DMA AND CONTROL" 


ATSTDMA! TSTCON, @SFR 
:POAD RESOLUTION, GAIN, ZB ENABLE VALUE 

ENABLE ‘‘TEST Z'* PULSES 

7SET ENABLE NCV11 

;DISABLE ‘TEST 2°’ PULSES 

@ADM, SBDDAT sREAD THE he ak DATA MAKER 

#2552, $GDDAT LOAD EXPECTED VALUE 
; COMPARE EXPECTED. TO READ 


SGDDAT , SBDDAT 

TST70 AME 

20 ; INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 2 GAIN = 1 ZB ENABLE = 0 


. 
FRI III IRE ERIK KKK KEE REE ERE KEHOE 


ATEST 70 TEST ADDRESS MAKER = MATRIX MODE —- RES = 2 GAIN = 0 ZB ENABLE = 


RK KEKE KK KEKE RK KEE EEK KEEKEEEEKEEKEKKEEEEKEKKKEKEKKEKEEKEEKEKKEKK 


18170: 
3:D0 10 dopey on 
CLEAR DEVICE 


#TESTZ,aSFR 


72BR IF § 


#10, $TIMES 
#CLRALL ,aSFR 

#TSTDMAITSTCON, aSFR :SET ‘'TEST DMA AND CONTROL" 

#4024 ,aCS LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
PTEST? OSPR ; ENABLE “TEST 2°" PULSES 

#B1T0,aCSR ;SET ENABLE NCV 
ATESTZ,@SFR :DISABLE ‘TEST 


v1 
Z** PULSES 
DAT [READ THE ADDRESS DATA MAKER 


@ADM, $BD 

#5224 ,$GDDAT SLOAD EXPECTED VALUE 

SGDDAT , $BDDAT ; COMPARE EXPECTED TO READ 

TST71 :;BR IF SAME 

20 : INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 2 GAIN = Q ZB ENABLE = 1 


0 ZB ENABLE = 


MATRIX MODE - RES = 2 GAIN = 1 ZB ENABLE = 


Cc 


0 


1 


SEQ 0055 
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CZNCCA.P11 71 TEST ADDRESS MAKER = MATRIX MODE = RES = 1 GAIN = 0 ZB ENABLE = 0 SEQ 0056 


SIRI RR IRR RII RIKER EERE ER ERE RK 


z*TEST 71 TEST ADDRESS MAKER = MATRIX MODE - RES = 1 GAIN = 0 ZB ENABLE = C 


PEE A dated dtd ka hakaha he kalalakahalahahahehahaiahalehaheleheheiaheleiehelelaheleheheielelslolaieleieieieieisieleieieleielel 


013522 000004 TST71: 
#10,$TIMES 3:DO0 10 ITERATIONS 
ACLRALL, aSFR ;CLEAR DEVICE 
ATSTDMA'TSTCON, aSFR SET ‘TEST DMA AND CONTROL" 
#22,aCSR LOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
ATESTZ,@SFR ENABLE ‘TEST 2°’ PULSES 
#BITO,aCSR ;SET ENABLE NCV 11 
#TESTZ,@SFR ‘DISABLE “TEST Z'* PULSES 
@ADM, SBDDAT ;READ THE ADDRESS DATA MAKER 
#0,$GDDAT ;LOAD EXPECTED VALUE 
001126 SGDDAT , $BDDAT ; COMPARE EXPECTED TO READ 
TST72 ;7BR IF SAM E 
20 ; INCORRECT ADDRESS MAKER DATA 
RESOLUTION = 1 GAIN = 0 ZB ENABLE = 0 
SRR REE REE EERE KER ER EERE ERE ER EERE EERE REE 
TEST 72 TEST ADDRESS MAKER = MATRIX MODE - RES = 1 GAIN = 1 ZB ENABLE = 0 
PETTITT TTT tii titi titi tii iiitii iii iii iti iiiiti iii iad 
TST72: 
001160 #10, $TIMES ::D0 10 ITERATIONS 
#CLRALL ,@SFR ;CLEAR DEVICE 
#TSTDMA!TSTCON,@SFR SET ‘'TEST DMA AND CONTROL'’ 
#2022,aCSR sLOAD RESOLUTION, GAIN, 7B ENABLE VALUE 
ATESTZ,ASFR sENABLE ‘‘TEST 2Z'° PULSES 
#BITO,aCSR 7SET ENABLE NCV v11 
FEST?" me ;DISABLE ‘TEST 2°* PULSES 
@ADM, $BDDAT READ THE ADDRESS DATA MAKER 
#1265, SGDDAT ;LOAD EXPECTED VALUE 
001126 $GDDAT, $BDDAT ; COMPARE EXPECTED TO READ 
TST73 ; BR IF SAME 
013724 20 ; INCORRECT ADDRESS MAKER DATA 
$ RESOLUTION = 1 GAIN = 1 ZB ENABLE = 0 
LL RRR EEE EEE EERE REE RE EERE EERE EERE REE REE EEK 
s*TEST 73 TEST ADDRESS MAKER = MATRIX MODE - RES = 1 GAIN = 0 ZB ENABLE = 1 
FL RRR ERR EERE EERE EEE KEKE EEE EEE ERE EEEKEEKEEREEREE EEE 
013726 000004 TST73: 
001160 MO #10, $TIMES ::D0 10 ITERATIONS 
#CLRALL, asFR sCLEAR DEVICE 
#TSTDMAITSTCON, aSFR :SET ‘'TEST DMA AND CONTROL" 
#4022,aCS sLOAD RESOLUTION, GAIN, ZB ENABLE VALUE 
aTEST OSER : PULSES 
#B1TO,aCSR 1 
#TESTZ, aSFR ABLE SES 
“READ THE ADDRESS DATA MAKER 
;LOAD EXPECTED VALUE 
001124 001126 scbpar, $BDDAT *COMPARE EXPECTED TO READ 
E ST74 3 :BR IF SAME 
014026 8 ; INCORRECT ADDRESS MAKER DATA 
: RESOLUTION = 1 GAIN = 0 2B ENABLE = 1 





zz 
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CZNCCA.P11 T74 TEST ADDRESS MAKER = LIST MODE - ZB ENABLE = 0 GAIN = 0 SEQ 0057 
2006 Find neediest tala indatinletntat india 
2007 i*TEST 74 TEST ADDRESS MAKER = LIST MODE - ZB ENABLE = 0 GAIN = 0 
2008 BDA ROI IOIIIIIOIIOIOIIOIDISIDISIOIIOIOI IOI TOT TOT TOT TOT TOT TT ET TTT TE 
2009 014030 000004 ; TST74: SCOPE 
2010 014032 012737 000010 001160 MOV #10, ni ae 33:D0 10 tt ean Bevit 
2011 014040 012777 004000 165710 MOV A#CLRALL ,@SFR ;CLEAR DEVI ; 
2012 014046 012777 000014 165702 MOV #TSTDMATTSTCON, @SFR SET TEST ‘OHA AND CONTROL’ 
2013 014054 012777 000000 165664 MOV #0,aCSR sENSURE LIST MODE 
2014 014062 052777 000002 165666 BIS PTEST? ASR ENABLE ‘'TEST Z** PULSES 
2015 014070 052777 000001 165650 BIS #B1TO,aCSR [SET ENABLE NCV11 
2016 014076 042777 000002 165652 BIC ATESTZ,ASFR DISABLE ‘TEST Z'' PULSES 
2017 014104 017737 165650 001126 MOV @ADM, SBDDAT ;READ THE ADDRESS MAKER VALUE 
2018 014112 012737 003407 001124 MOV #3407, $GDDAT ;LOAD EXPECTED VALUE 
2019 014120 023737 001124 001126 CMP $SGDDAT , SBDDAT ;COMPARE EXPECTED TO READ 
2020 014126 001401 BEQ TST75 377BR IF SAME 
2021 014130 104021 ERROR 21 ; INCORRECT ADDRESS MAKER DATA 
sast ;RESOLUTION 7 <DEFAULT WHEN ZB IS NOT ENABLED> 
2024 DIOR III III IIIT IOI IOI OI TOT TOT TTT OT OTT TTT TOTTI TT TOT TTT TTT 
2025 z*TEST 75 TEST ADDRESS MAKER = LIST MODE - ZB ENABLE = 1 GAIN = 0 
2026 FRO RIOR IOIIIICIOIOIOIIEIOIICIOIOI IIIT TTA IIASA I AAASISSIASSSISISS SA 
2027 014132 000004 TST75: SCOPE 
2028 014134 012737 000010 001160 MOV #10, $TIMES 3:D0 10 ITERATIONS 
2029 014142 012777 004000 165606 MOV ACLRALL ,@SFR ;CLEAR DEVICE 
2030 014150 012777 000014 165600 MOV ATSTDMA! TSTCON, @SFR SET TEST ‘DMA AND CONTROL" 
2031 014156 012777 004000 165562 MOV #4000, aCSR sENSURE LIST MODE AND ZB ENABLED 
2032 014164 052777 000002 165564 BIS MTESTZ, SFR TENABLE “TEST Z°* PULSES 
2033 014172 052777 000001 165546 BIS #B1TO,aCSR SET ENABLE NCV11 
2034 014200 042777 000002 165550 BIC MTESTZ,ASFR DISABLE ‘TEST 2** PULSES 
2035 014206 017737 165546 001126 MOV @ADM, SBDDAT ;READ THE ADDRESS MAKER VALUE 
2036 014214 012737 052452 001124 MOV #52452, $GDDAT ;LOAD EXPECTED VALUE 
2037 014222 023737 001124 001126 CMP $GDDAT , SBDDAT + COMPARE EXPECTED TO READ 
2038 014230 001401 BEQ TST76 377BR IF SAME 
2039 014232 104021 ERROR 21 ; INCORRECT ADDRESS MAKER DATA 
on ;RESOLUTION 5 <DEFAULT WHEN ZB IS ENABLED> 
2042 gj SddRORCRTESERERERSESESTETNESESETeEERDNRNETEOENSERESROENESERSROS 
2043 ; i*TEST 76 TEST ADDRESS MAKER - LIST MODE - ZB ENABLE = 0 GAIN = 1 
2044 DDI IOI III IOIOICITIOIIIOITIOIUIOIICI IIIT TOT TORTI TTT TTT TTT ATION 
2045 014234 000004 TST76: SCOPE 
2046 014236 012737 000010 001160 MOV #10, $TIMES 72DO0 10 ITERATIONS 
2047 014244 012777 004000 165504 MOV #CLRALL ,@SFR sCLEAR THE DEVICE 
2048 014252 012777 000014 165476 MOV #TSTDMAITSTCON. aSFR iSET TEST so AND CONTROL"’ 
2049 014260 012777 002000 165460 MOV ¥2000,aCS SET GAIN F 
2050 014266 052777 000002 165462 BIS FEST OSFR ENABLE NTEST on PULSES 
2051 014274 052777 000001 165444 BIS - #B1T0,aCSR sENABLE THE NCV11 
2052 014302 042777 000002 165446 BIC ATESTZ,ASFR [DISABLE THE ‘TEST Z°* PULSES 
2053 014310 017737 165444 001126 MOV @ADM, SBDDAT ;READ THE ADDRESS MAKER VALUE 
2054 014316 012737 127657 001124 MOV #127657 ,SGDDAT LOAD THE EXPECTED 
2055 014324 023737 001124 001126 CMP $GDDAT , $BDDAT ; COMPARE 
2056 014332 001401 BEQ TST77 :2BR IF SAME 
2057 014334 104021 ERROR 21 : INCORRECT erage MAKER DATA 
2058 ;RESOLUTION 7 - GAIN FLOP SET 
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DIAGNOSTIC MACY11 27(654) 8=AUG-78 
177 ENABLE A ONE WORD TRANSFER SECTION LIST MODE SEQ 0058 
FD II TIT IIIT TOR TOT I TOR TTT TTI ITO TORTI OTS TOTO IOI TOTTI TOIT I IIIT II IN 
s*TEST 77 ENABLE A ONE WORD TRANSFER SECTION LIST MODE 
; 4 PRRAAAAALAALAAZAAAAESAAASEAAASASAESLESAESZE LE SESE SEE ESE ER RR ASA SAR SSS SD 
TST77: SCOPE 
012737 000040 001160 MOV #40,$TIMES ::D0 40 ITERATIONS 
012777 004000 165402 MOV #CLRALL ,@SFR sCLEAR THE DEVICE 
012737 125252 060000 MOV #125252,BUF0 ;PRIME TARGET BUFFER 
012777 011110 165360 MOV #11110, a0FF ;LOAD THE Ak bees WITH A NUMBER 
012777 177777 165354 MOV #-1,awCR :SET UP 1 WORD TRANSFER 
012777 060000 165350 MOV #BUFO, aBAR * LOAD BUS SODRESS mr OR RESULT 
012777 000014 165344 MOV ATSTDMA! TSTCON, aSFR s ENABLE TEST CONTROL AND DMA FLOPS 
052777 000001 165326 BIS #BITO,aCSR sENABLE DEVICE 
052777 000002 165330 BIS ATESTZ, asFR sENABLE ‘TEST 2'* PULSES 
04277 2 165322 BIC ATESTZ,ASFR :DISABLE ‘‘TEST Z°* PULSES 
000240 NOP 
000240 NOP 
000240 NOP 
052777 010000 165306 BIS #B1T12,aSFR ;ALLOW 1 DMA TRANSFER 
000240 NOP 
000240 NOP 
000240 NOP 
017737 165264 001126 MOV acSR,$BDDAT sREAD STATUS 
012777 004000 165264 MOV ACLRALL ,@SFR sRESET THE DEVICE 
012737 040200 001124 MOV #40200, $GDDAT ;LOAD EXPECTED 
023737 001124 001126 CMP S$GDDAT , $BDDAT ; TEST STATUS 
001402 BEQ 4$ :7BR IF EXPECTED 
ronctt ERROR 7$T100 sUNEXPECTED STATUS AFTER A 1 WORD TRANSFER 
017737 165234 001126 4$: MOV @BAR , $BDDAT ;READ BUS ADDRESS 
012737 060002 001124 MOV #BUF 0+2, $SGDDAT ;LOAD EXPECTED 
023737 001124 001126 CMP $GDDAT, $BDDAT : COMPARE VALUES 
001401 BEQ 1$ :;BR IF SAME 
104022 ERROR 22 : INCORRECT BUS ADDRESS VALUE 
;AFTER A 1 WORD TRANSFER 
017737 165204 001126 1$: MOV aWCR, $BDDAT ;READ W.C. REGISTER 
012737 000000 001124 MOV #0,$GDDAT *LOAD ag oy, VALUE 
023737 001124 001126 CMP SGDDAT , SBDDAT = COMPARE V ALUES 
001401 BEQ 2$ 7 7BR IF SAME 
104023 ERROR 23 ; INCORRECT WORD COUNT REGISTER VALUE 
AFTER A’1 WORD TRANSFER 
005037 001124 2$: CLR $GDDAT sCLEAR THE EXPECTED VALUE 
017737 165150 001126 MOV a0F F , S$BDDAT *READ THE OFFSET REGISTER 
001401 BEQ 3$ 77BR IF CLEARED 
104024 ERROR 24 + ipee i REG. FAILED TO CLEAR AFTER 
s1 4 
013737 060000 001126 3$: MOV BUF 0, S$BDDAT GET BUFFER DATA 
012737 003407 001124 MOV #3407, $SGDDAT :LOAD EXPECTED 
012737 060000 001122 MOV #BUFO, $BDADR [LOAD BAD ADDRESS 
023737 001124 001126 CMP $GDDAT , $BDDAT s COMPARE DATA 
001401 BEQ TST100 :7;BR IF SAME 
10403 ERROR 37 :STATUS WAS OK BUT DATA WAS INCORRECT 


on 
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SECTION LIST MODE SEQ 0059 


ila heha hahahahahahaha halal lohehelahehelahehaiaiahsisheislaieiahelslaheielsheiiaheieleheleiehelaiehsicheioleheisioieielehelehel 


“*TEST 100 


ENABLE A 512 WORD TRANSFER SECTION LIST MODE 


PIE k hahahahahaha hahahah lehahelehahelahaheheiahalahahelaheieheheielaheleheislaleielsheislehslsiaieisiaheicleisicleieielelelel 


TST100: SCOPE 
MOV 


1$: 


#40,$TIMES ::D0 40 ITERATIONS 

ACLRALL,@SFR :CLEAR THE DEVICE 

#BUF0,RO ‘LOAD BUFFER POINTER 
#125252, (RO)+ “PRESET THE BUFFER WITH DATA 
0 j T IF DONE 


: IF NOT 
#-512.,awWCR SET UP 512. WORD TRANSFER 
#BUF 0, BAR ;LOAD BUS ADDRESS FOR RESULT 
#TSTDMA! TSTCON, @SFR ;ENABLE TEST CONTROL AND DMA FLOPS 
#B1T0,aCSR ENABLE DEVICE ; 
#512. ,$TEMP ;LOAD THE COUNTER 


ATESTZ,ASFR sENABLE ‘‘TEST 2Z'* PULSES 
MTESTZ,ASFR DISABLE ‘TEST Z'' PULSES 
#B1T12,aSFR ALLOW 1 DMA TRANSFER 
STEMP SFINISHED ALL WORDS? 

;BR UNTILL DONE 


READ STATUS 

LOAD EXPECTED STATUS 

$GDDAT , SBDDAT COMPARE DAT 

3$ EXPECTED STATUS 

Feries UNEXPECTED STATUS AFTER 512 WORD TRANSFER 


SGDDAT CLEAR EXPECTED 
= tah mamas: READ —_ REG. 


;;BR IF CLEARE 
6 [UNEXPECTED OFFSET REGISTER BIT SET 
#CLRALL ,@SFR :CLEAR THE DEVICE 
@BAR, SBDDAT ;READ BUS ADDRESS 
#BUF 1, SGDDAT ;LOAD EXPECTED BAR VALUE 
ScDDAT, - SBDDAT ; COMPARE VALUES 


$ ::BR IF SAME 
22 : INCORRECT BUS ADDRESS VALUE AFTER A 1 WORD TRANSFER 


awCR,$BDDAT READ W.C. REGISTER 
#0, SGDDAT ;LOAD EXPECTED W.C. VALUE 
$GDDAT , SBDDAT COMPARE VALUES 
6$ 33BR IF SAME 
23 ; INCORRECT WORD COUNT REGISTER ry AFTER A 1 WORD TRANSFER 
#3407, $GDDAT ;LOAD EXPECTED D 
LOAD STARTING ADDRESS 


$GDDAT , $BDDAT : 
10$ 73;BR IF EXPECTED 

37 INCORRECT DATA IN LIST MODE XFER. 
#2, $BDADR [UPDATE POINTER 

#BUF 0+1024. , $BDADR :TEST IF END OF BUFFER 

7$ 3;BR IF NOT DONE 





an 
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CZNCCA.P11 T101 VERIFY ‘'TIMEQUT’’ FLOP SETS AND "‘CLR ALL"’ CLEARS IT SEQ 0060 

2164 FTAA REEREERERAERKEREREREREEEEEREREEEEEKEKEREREREER 
2165 Z*TEST 101 VERIFY ‘'TIMEQUT'' FLOP SETS AND ‘‘CLR ALL'’ CLEARS IT 
2166 J LEER REE EERE REE EERE EKER EREREEEEE REE EREREKERE 
2167 015166 000004 $1101: SCOPE 
2168 015170 012737 000040 001160 MOV «#40, STIMES ;:D0 40 ITERATIONS 
2169 015176 012777 164552 MOV  #CLRALL,aSFR CLEAR DEVICE 
2170 015204 012777 177777 164540 Mov -#-1 ,aWCR [LOAD W.C. REGISTER 
2171 015212 012777 000003 164530 MOV = #3,a0 ;LOAD EXTENDED ADDRESS BITS 
2172 015220 012777 1 164526 MOY #160000, BAR LOAD BUS ADDRESS REGISTER TO A NON-EXIENT ADDRE 
2173 015226 012777 000014 164522 MOV AISTCON'TSIOMA, aSFR [SET TEST CONTROL AND DMA " 
2174 34 012777 000016 164504 MOV #16, aCS [LOAD RESOLUTION TO VERIFY ‘‘SFR INIT*’ CLEARS 
2175 015242 052777 000001 164476 BIS #BITOCaCSR ENABLE THE DEVICE 
2176 015250 052777 000002 164500 BIS  #TESTZ,aSFR ZENABLE '‘TEST 2° PULSES 
2177 015256 042777 000002 164472 BIC - #TESTZ.aSFR DISABLE ‘TEST 2°* PULSES 
2178 015264 000240 NOP 
2179 015266 000240 NOP 
2180 015270 000240 NOP 
2181 015272 052777 010000 164456 BIS  #BIT12, aSFR ;ALLOW 1 DMA TRANSFER 
2182 015300 000240 NOP 
2183 015302 000240 NOP 
2184 01 000240 NOP 
2185 015306 012737 140200 001124 MOV #81 T15:B1T14:BIT7,$GDDAT ;LOAD EXPECTED 
2186 015314 017737 164426 001126 MOV —s @CSR, SBDDAT READ STATUS REG. 
2187 015322 100402 BMI 1$ ZBR IF ‘TIMEOUT’ FLOP IS SET 
2188 015324 104025 ERROR 25 :‘‘TIMEOUT’' FLOP FAILED TO SET 
2189 015326 000423 BR TST102 33 
2190 015330 023737 001124 001126 1S: CMP - $GDDAT . SBDDAT ;COMPARE VALUES 
2191 015336 001401 BEQ ss BR IF SAME 
2192 015340 104025 ERROR 25 :''TIMEOUT’' FLOP DID SET BUT FAILED TO GENERATE ** 
2193 015342 052777 004000 164406 28: BIS #CLRALL,aSFR GENERATE AN ‘'CLR ALL‘ TO CLEAR TIMEOUT FLOP 
219% 015350 012737 000200 001124 MOV  - #BIT7, SGDDAT [LOAD EXPECTED 
2195 015356 017737 164364 001126 MOV — @CSR, $BDDAT READ STATUS 
2196 015364 023737 001124 001126 CMP —- $GDDAT , SBDDAT :COMPARE VALUE 
2197 015372 001401 BEQ TST102 :7BR_ IE SAME 
2198 015374 104025 ERROR 25 ‘CLR ALL'’ FAILED TO CLEAR TIMEOUT FLOP 
2199 PEASE UTI IOI ISIS ROOT IOIUIOINIOIOITIOIIOIIUITITI IOI ITI IIR 
2200 TATEST 102 VERIFY ‘'TIMEOUT'’ FLOP SETS AND ‘CLR TIMEOUT'' CLEARS IT 
2201 ITT TIT E I TIT TITTLE LLL LLL LLL 
2202 015376 000004 151102: SCOPE 
2203 015400 012737 000040 001160 MOV #40, $TIMES ::D0 40 ITERATIONS 
2204 015406 012777 004000 164342 MOV = ACLRALL ,@SFR CLEAR DEVICE 
2205 015414 012777 177777 164330 MOV #1, aWCR LOAD W.C. REGISTER 
2206 015422 012777 000003 164320 MOV «#3, AOFF ;LOAD EXTENDED ADDRESS BITS 
2207 015430 012777 160000 164316 MOV #160000, aBAR LOAD BUS ADDRESS REGISTER TO A NON-EXIENT ADDRE 
2208 015436 012777 000014 164312 MOV = #TSTCON! TSTDMA, aSFR SSET TEST CONTROL AND DMA 
2209 015444 777 000001 164274 BIS  #BITO,aCSR ZENABLE THE DEVICE 
2210 015452 82777 000002 164276 BIS  #TESTZ,aSFR ZENABLE ‘‘TEST Z°* PULSES 
2211 015460 "042777 000002 164270 BIC - #TESTZ.aSFR :DISABLE ‘TEST Z°* PULSES 
2212 000240 NOP 
2213 015470 000240 NOP 

| gei1é Gisé72 002260 NOP 
2ci§ 218474 OS2777 H1N0Ce 144254 BIS  - WBIT12,aSFR ALLOW 1 DMA TRANSFER 
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CZNCCA.P11 T102 VERIFY *‘TIMEQUT’’ FLOP SETS AND ‘'CLR TIMEOUT’ CLEARS IT 


140200 001124 #BIT15: es SGDDAT ;LOAD EXPECTED 
164224 001126 acSR,$BDDAT :READ STATUS REG. 
1$ <BR IF ‘‘TIMEOUT'’ FLOP IS SET 
25 :"'TIMEOUT’' FLOP FAILED TO SET 
BR TST103 3s 
001126 "  pepennas = VALUES 


oe AME 
5 :''TIMEOUT'' FLOP DID SET BUT FAILED TO GENERATE ** 
164204 3 #B1T15,aSFR [GENERATE AN ‘CLR TIMEOUT’’ TO CLEAR TIMEOUT FLOP 
001124 #1114 ‘8177, S$GDDAT = LOAD EXPECTED 
001126 acsR,$8 READ STATUS 


DDAT 
001124 001126 SGDDAT , SBDDAT : COMPARE VALUE 
TST103 :;BR IF SAME 
25 :""CLR TIMEOUT’’ FAILED TO CLEAR TIMEOUT FLOP 
FL RRR RRR EEE EERE KER ERE EEK ERE EEE EEE REE EEE 
s*TEST 103 VERIFY ‘'TIMEOUT'’ INTERRUPT 


KKK EKER KEEEKEEKEKEKKEKEEKKKEEKEEEEKKKKKKKEKKKK 


1ST103: SCOPE 
MOV 


#40, $TIMES 3:D0 40 ITERATIONS 
#CLRALL ,@SFR :CLEAR DEVICE 
#-1, — [LOAD W.C. REGISTER 
#3,a0 ;LOAD EXTENDED ADDRESS BITS 
#160000,a8 ;LOAD BUS ADDRESS REGISTER TO A NON-EXIENT ADDRE 
AISTCONTSTOM, -@SFR SET TEST CONTROL AND DMA 
#1$,-(SP) 


015752 : #2$ ,aVECTAO 


#B1T6!BITO,aCSR sENABLE THE DEVICE 
ATESTZ,@SFR TENABLE “TEST 2°" PULSES 
ATESTZ,@SFR ;DISABLE ‘TEST Z°* PULSES 


164022 - ake #B1T12,aSFR ALLOW 1 DMA TRANSGFER 


acSR CLEAR ENABLE 
26 : “TIMEOUT FAILED TO INTERRUPT 
015750 000401 BR 3$ 33 CLEAN UP 


015752 : (SP)+, (SP)+ CLEAN THE STACK 
5077 163766 : aCSR 
004000 163770 ACLRALL ,@SFR :CLEAR THE DEVICE 
001774 163776 VECTA1 ,aVECTAO ;RESET VECTOR 
015774 5077 163774 aveECTA 
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016144 


016146 


016322 


000040 
004000 
036402 


177777 


K 5 
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001160 
163740 
002140 


163716 
163712 


163702 
163664 


001160 
163572 
006140 


163550 


163502 


163466 


001124 
001126 
001126 


STIC 
VERIFY INCREMENTING INTO EXTENDED ADDRESS BIT 16 


dt tated hat k baka ka hala hahalahalalahahelahahehahalshehelahelsheheieleheishehelehehelshsielaliehsheisisheieleieicieieiohel 


SeTEST 106 VERIFY INCREMENTING INTO 


EXTENDED ADDRESS BIT 16 


RRR RRR EERE EERE EEEKKKKKEKEKEEKEKEEKKREEKEEREKKEEEEERHKEKKKE 


TST104: SCOPE 
MOV #40, $TIMES 
ACLRALL ,@SFR 
$LSTBK ,#2140 
TST105 


#-1,aWCR 

#177776, @BAR 

@OF F 

ATSTCON! TSTDMA,@SFR 
16,aCSR 


3:D0 40 ITERATIONS 

sCLEAR THE DEVICE 

; TEST IF ENOUGH MEMORY 
77BR IF NOT 


ENOUGH MEMORY 

LOAD 1 WORD XFR 

[LOAD LAST ADDRESS 

sENSURE CLEARED EXTENDED ADDRESS BITS 
ONTROLER 


‘BI SABLE "TEST 2°" PULSES 


#B1T12.aSFR 


#1,$GDDAT 
@0F F ,$BDDAT 


ZALLOW 1 DMA TRANSFER 


LOAD EXPECTED VALUE 
READ ACUTAL VALUE 


$GDDAT , SBDDAT ; COMPARE 


TST105 


73BR_IF SAME 
EXTENDED ADDRESS BIT 16 FAILED TO SET 


SLR EEE EERE REE EKER REE EERE EERE EERE K EEK 


z*TEST 105 VERIFY INCREMENTING INTO 


EXTENDED ADDRESS BIT 17 


SERRE ERE REE REE EEE EERE ERE REE EEE EERE EERE ER KH 


TST105: SCOPE 
MOV #60, S$TIMES 
ACLRALL ,aSFR 


$LSTBK ,#6140 TEST 
TST106 


72D0 40 ITERATIONS 


;CLEAR THE DEVICE 
MEMORY SPACE >100K 


;;BR IF NOT ENOUGH MEMORY 


#-1,aWCR 
#177776, @BAR 

#1, a0FF 

ATSTDMA! TSTCON, aSFR 
#16,aCSR 

#B1T0,aCSR 


ATESTZ,@SFR 
ATESTZ,@SFR 


#B1T12,aSFR 


#2, —— 
@0F F , SBDDAT 

SGDDAT , $BDDAT 
TST106 


LOAD 1 WORD XFR 
;LOAD LAST ADDRESS 
;LOAD EXTENDED ADDRESS BIT 


SENABLE TEST CONTROL 
ENABLE THE MODE 

sENAVLE THE DEVICE 
sENABLE "‘TEST 2°* PULSES 
DISABLE ‘'TEST 2°* PULSES 


;ALLOW 1 DMA TRANSFER 
;LOAD EXPECTED 

READ ACTUAL 

; COMPARE 


SAME 
>EXTENDED ADDRESS BIT 17 FAILED TO SET 
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CZNCCA.P11 T106 VERIFY ‘‘SET EVENT’’ DATA GENERATES A 177777 DATA WORD SEQ 0063 


FERRARA RRR RE EEE REE EERE REEEREEEREREREEEE ERE EEE EEE 


;*TEST 106 VERIFY ‘'SET EVENT'' DATA GENERATES A 177777 DATA WORD 


RRR kth kkk kik ke lak ieke hake ahahahahalelehaheleheleielahelahelehelaielaieiehelahsiahelshelheishelcleiolelel 


016324 000004 TST106: SCOPE 
MOV 


#40, STIMES 3:D0 40 ITERATIONS 

ACLRALL ,@SFR ;CLEAR THE DEVICE 

#-1,awCR :SET UP 1 WORD TRANSFER 

#BUF 0, BAR LOAD BUS ADDRESS FOR RESULT 
#TSTDMA! TSTCON, @SFR ENABLE TEST CONTROL AND DMA FLOPS 
#7070 BUFO [PRESET DATA 

#B1T0,aCSR SENABLE DEVICE 


163342 #B1T10,aSFR SET ‘EVENT’ FLOP 
163334 #B1T12,aSFR z;ALLOW 1 DMA TRANSFER 


001126 BUF 0, $BDDAT READ DATA 

001124 ;LOAD EXPECTED 

001126 COMPARE VALUES 
$1107 FE AME 


S 
; INCORRECT DATA VALUE FOR ‘EVENT** MARK 
z;AFTER A 1 WORD TRANSFER 


DOSER EEE EES EEE IO IE OTIS III IOUIISIIUITOUUIEISOIIOIOOI IIE 


TATEST 107 VERIFY ‘‘SET TIME'’ DATA GENERATES A 000000 DATA WORD 


REAR AEEEEEREAAEEEE EEE E EEE EEEEEEEKEEEKEKEEKEKREEEKEKKEKKEKKK 


+$1107: SCOPE 
MOV #40, $TIMES 3:D0 40 ITERATIONS 
ACLRALL ,@SFR CLEAR THE DEVICE 
#~-1 ,awCR SET UP 1 WORD TRANSFER 
#BUF 0, @BAR [LOAD BUS ADDRESS FOR RESULT 
#TSTDMA! TSTCON, @SFR ENABLE TEST CONTROL AND DMA FLOPS 
060000 #7070 ,BUFO [PRESET THE DATA 
163214 #B1TO,aCSR SENABLE DEVICE 


163210 #BIT9,aSFR 3SET "'TIME’’ FLOP 
163202 #B1T12,aSFR SALLOW 1 DMA TRANSFER 


BUFO, 0 ;READ DATA 

#0, $GDDA ;LOAD EXPECTED 

$GDDAT, SBDDAT : COMPARE VALUES 

TST110 723BR IF SAME 

27 : INCORRECT DATA VALUE FOR ‘'TIME'’ MARK 
sAFTER A’1 WORD TRANSFER 
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CZNCCA.P11 VERIFY "‘CLOCK ST1°* GENERATES A EVENT (177777) DATA WORD 


FLARE REE RE ERE REE EERE ERE REE EE RRR EKER EERE 
:*TEST 110 VERIFY ‘CLOCK ST1'' GENERATES A EVENT (177777) DATA WORD 
FLARE EERE EERE ER EE EERE EERE REE EERE REE ER ER ERE 
1ST110: SCOPE 

000040 001160 MOV #40,$TIMES ::D0 40 ITERATIONS 

004000 163130 #CLRALL, asFR sCLEAR THE DEVICE 

004016 E bi TEST IF NCV11 CLOCK IS PRESENT 

177777 163110 o :SET UP 1 WORD TRANSFER 

060000 #BUF 0, BAR “LOAD BUS ADDRESS FOR RESU 

000014 #TSTDMA! TSTCON, aSFR ‘ENABLE TEST CONTROL AND NA FLOPS 

007070 060000 #7070,BUFO “PRESET THE DATA 

000001 163054 #B1T0,aCSR *ENABLE THE DEVICE 


NOP- 
163034 #B1T8,akWCSR GENERATE CLOCK ST1 TO SET ‘EVENT’ FLOP 
163044 | got #B1T12,aSFR ;ALLOW 1 DMA TRANSFER 


001126 BUF 0, $BDDAT ;READ BUFFER DATA 
001124 “ DD ;LOAD EXPECTED DATA 
; COMPARE 


001126 
E EXPECTED 
016742 104040 0 ;CLOCK ST1 FAILED TO GENERATE EVENT FLAG 
CHECK THE M8026 TO M7952 JUMPERS 


| SEE EEE Ree 


z*TEST 111 VERIFY **CLOCK OVERFLOW’* GENERATES A TIME (000000) DATA WORD 


JL RAE AREA EEE RE EREREREREEEREERERREEREEEEEEREEREREREEREREEE 


000040 160 MOV #40, $TIMES .* .;;D0 40 ITERATIONS 
004000 #CLRALL ,@SFR CLEAR THE DEVICE 
604016 DEADKW grest IF NCV11 CLOCK IS PRESENT 
na ¢ TST112 :7BR IF NO 
177777 MO #~-1,awWCR Meer UP 1 WORD TRNSFER 
060000 7 #BUF 0, BAR _*- LOAD BUS ADDRESS FOR RESULT 
000014 ~... #TSTDMA!TSTCON, asFR - ENABLE TEST CONTROL AND DMA FLOPS 
007070 060000 MOV #7070, BUFO PRESET THE DATA 
gogoe! 162720 #3110, ers ENABLE THE DEVICE 


16 C 

177776 162704 MO #~2 ,AKWPSR 31 ESET 

000011 162672 #11, aKWCSR 7 ENABL MHZ. RATE AND CLOCK GO 
162666 1$: me [WAIT FOR CLOCK 


BP $ 
010000 162674 at #B1T12,aSFR ALLOW 1 DMA TRANSFER 


016744 


BUF 0, $BDDAT zREAD DATA 
#0,$GDDAT LOAD EXPECTED 
SGDDAT , SBDDAT COMPARE VALUES 
E TST112 $3 SAME 
017112 40 CLOCK OVERFLOW FAILED TO GENERATE ‘TIME MARKS** 
[CHECK THE M8026 TO M7952 JUMPERS 
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017244 


017246 


017400 
017402 


5 
TIC MACY11 27(654) 8=AUG-78 15:05 PAGE 53 CZ 
VERIFY "‘SET TIME’ OVERRIDES ‘'SET EVENT’ DATA CZ 


“pegs atime tdind lg ttageinanleny adopt tatiana 


LATEST 112 


VERIFY *‘SET TIME’’ OVERRIDES ‘'SET EVENT** DATA. 


RK ERE REE 


tér1i2: SCOPE 
MOV 


#40, $TIMES 3;D0 40 ITERATIONS 

ACLRALL ,@SFR CLEAR THE DEVICE 

#~1 ,aWwCR [SET UP 1 WORD TRANSFER 

#BUF 0, @BAR ;LOAD BUS ADDRESS FOR RESULT 
ATSTDMA! TSTCON, @SFR ENABLE TEST CONTROL AND DMA FLOPS 
#7070 BUFO [PRESET THE DATA 

#B1T0,aCSR ENABLE DEVICE 


#B1T10!BIT9,aSFR :SET ‘TIME AND EVENT'’ FLOPS 
#B1T12,aSFR ZALLOW 1 DMA TRANSFER 


BUF 0, SBDDAT READ DATA 
;LOAD EXPECTED 
; COMPARE VALUES 
F SAME 
''TIME’’ MARK FAILED TO OVERIDE “EVENT’’ OR DATA M 


= RRR EREEEKEEEEKKEEEKEEEEEEEEKEEKREKEEEKEEEEEEREREEEKKKKK 


SeTEST 113 


DO A ONE WORD MATRIX MODE TRANSFER -CHECK FOR INCREMENT FUNCTION 


5 REAR ERE ERE REE ERE KEE EERE RARER REE R EEE 


TS1113: SCOPE 
MOV 





#40, $TIMES 72:D0 40 ITERATIONS 

AMCLRALL ,@SFR ;CLEAR THE DEVICE 

BUF 0 [CLEAR INITIAL INREMENT LOCATION 
#BUF 0 , OF F [LOAD INITIAL OFFSET REGISTER 
#B1T4!BIT1,aCSR : E MATRIX E 

ATSTDMA! TSTCON, @SFR 

#B1T0,aCSR 

ATESTZ,ASFR A E 

AMTESTZ,@SFR [DISABLE "TEST Z°' PULSES 


#B1T12,aSFR ;ALLOW 1 TRANSFER 


* 


BUFO, 9 ad sREAD THE BUFO LOCATION 
#1 ,$GDDAT ;LOAD EXPECTED VALUE 
ScbDaT, SBDDAT ; COMPARE VALUES 
ST114 7:BR IF SAME 
3 s INCORRECT DATA IN MATRIX MODE 
:I1F DATA WAS 0, THE ADDRESS ACCESSED WAS PROBLY WRONG 
:1F DATA WAS NON ZERO, THE ““INCR’’ REGISTER IS STUCK TO A 1 
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CZNCCA.P11 VERIFY EACH BIT OF THE INCREMENT REG. DATA PATH 


FDR III III IOI IOIEIIOIIOIOIIIOIIIIIII IITA IS ASIII AAS ISM 
z*TEST 114 VERIFY EACH BIT OF THE INCREMENT REG. DATA PATH 
ZAI IOC IOIOITI IIIT TOIT TTT TT TTT TAIT I SAIS 
TST114: SCOPE 
000040 001160 MOV #40 ,$TIMES 3:D0 40 ITERATIONS 
+ CHECK FOR A ‘‘CARRY'' INTO EACH BIT 
IE: 000002-000001 


+? eaeleaanaied 


ETC 
017414 012737 017430 001110 #1$,$LPERR ;LOAD RETURN ADDRESS IF ERROR 
017422 012737 000002 002004 #2,$TEMP ;LOAD INITIAL VALUE 


017430 012777 162320 : ACLRALL ,@SFR ;CLEAR THE DEVICE 
060000 #BUF 0, OF F ;LOAD INITIAL OFFSET REGISTER 
#81T4'BIT2,aCSR ENABLE WORD MATRIX MODE 
#TSTDMALTSTCON. @SFR ;SET TEST DMA AND CONTROL 
#B1T0,aCcs ENABLE THE DEVICE 
STEMP-BUFO ;LOAD PRESET VALUE 
BUF 0 :TO EXPECTED =1 
ATESTZ,ASFR TENABLE “TEST Z"" PULSES 
= DISABLE “TEST Z°* PULSES 
ALLOW 1 TRANSFER 
LOAD TYPEOUT EXPECTED 
0000 $8 ;READ THE BUFO LOCATION 
001124 001126 SGDDAT, - SBDDAT = VALUES 


2 AME 
30 z INCORRECT DATA IN THE INCREMENT REGISTER 
162172 001126 3 @CSR,$BDDAT ;READ STATUS 

020000 001126 > yh ramet ae oe UNEXPECTED CELL OVERFLOW 


3 
000024 001124 MOV #B1T4!BIT2,$GDDAT ;LOAD THE EXPECTED TYPEOUT 
‘ 31 [UNEXPECTED *'CELL 9 tetaael STATUS 
020000 162152 #B1T13,aSFR TRY TO CLEAR THE FLAG 
002004 : $STEMP [CHANGE THE EXPCTED 
017610 1$ ;BR IF MORE DATA BITS 
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CZNCCA.P11 CHECK FOR LOW BYTE ‘‘INC OVFL'’ TO SET CELL OVERFLOW AND ‘‘CLR CELL*’ TO CLEAR IT SEQ 0067 


PDAS ESI ISIS I ISI SISI IIIT I III III ICI IIIT III II SII IIIS SIS S SIN 
:*TEST 115 CHECK TOR LOW BYTE ‘INC OVFL'’ TO SET CELL OVERFLOW AND ‘'CLR CELL"’ 79 CLE 
BAER IIIA IAI III I IIIS ISSISIS SSAA. 
017612 000004 TST115: SCOPE 
001160 MOV #40,$TIMES 3;D0 40 ITERATIONS 
162126 ACLRALL ,@SFR CLEAR THE DEVICE 
awCR CLEAR WC 


@BAR CLEAR BAR 

162102 #BUF 0 , @OF F LOAD INITIAL OFFSET REGISTER 
#B1T4!BIT1,aCSR ENABLE BYTE MATRIX MODE 
A#TSTDMA! TSTCON, SFR 
#B1T0,aCSR 
ATESTZ,@SFR ; ENABL 

162052 ATESTZ,@SFR [DISABLE ‘TEST Z°' PULSES 


060000 #377 ,BUFO SET LOW BYTE OF BUFO LOC. TO BYTE -1 
060001 #200 ,BUFO+1 SET HIGH BYTE OF BUFO TO KNOWN VALUE 
162022 #B1T12,aSFR [ALLOW 1 TRANSFER 


162000 001126 aCSR,$BDDAT READ STATUS 
020022 001124 weiri3ie1r6:8171, $GDDAT ;LOAD hg he: STATUS 
001124 001126 $GDDAT , SBDDAT ; COMPARE VALUES 
1$ ::BR IF SAME 
31 :‘‘CELL OVERFLOW’ FLOP FAILED TO SET 
IN BYTE MODE FROM A LOW BYTE OVERFLOW 


sNOW GENERATE ‘‘CLR CELL** TO CLEAR CELL OVERFLOW FLOP 
161760 1$: BIS #BIT13, oe GENERATE ‘‘CLR CELL’ 
acsR R, $BDDAT *READ STATUS 
#BIT4'BIT1, $GDDAT ;LOAD EXPECTED 
001124 001126 $GDDAT, $BDDAT + COMPARE VALUES 
2$ :7BR IF SAME 
31 7"'CLR CELL'' FAILED TO CLEAR ‘CELL OVFL** FLOP 


: BYTE DATA CELL 

060000 001126 2$: MOV BUF 0, $BDDAT zREAD DATA 

100377 001124 #100377, $GDDAT ;LOAD EXPECTED 

001124 001126 S$GDDAT , $BDDAT ; COMPARE 

1401 E TST116 73BR IF SAME 
104031 31 OVERFLOW FROM INC, REG. FAILED TO INHIBIT 

:""INC CNT'' FROM CHANGING THE DATA OR 
CSR BYTE CELLS'' FAILED TO INHIBIT ‘INC ENA HI"' 
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P11 CHECK FOR WORD ‘‘INC OVFL*’ TO SET CELL OVERFLOW AND ‘CLR ALL"’ TO CLEAR IT SEQ 0068 


FERRARA EEERERERER ERR REREREER EKER 
TSTEST 116 CHECK TOR WORD "INC OVFL'' TO SET CELL OVERFLOW AND ‘CLR ALL"’ TO CLEAR IT 
TORR SSESSESESALELESES SELES EEE SRSA EERE SRR ARERR RRR SAAR AAAS DS 
181116: SCOPE 
001160 MOV #40, $TIMES ;3D0 40 ITERATIONS 
161666 #CLRALL SFR ;CLEAR THE DEVICE 


awcR =; 

#BUF 0, @0F F LOAD INITIAL OFFSET REGISTER 
#B1T4'BIT2,aCSR E RIX MODE 

#TSTDMA! TSTCON, aSFR 

#B1T0,aCSR 

ATESTZ,@SFR 

ATESTZ,@SFR “DISABLE "TEST Z** PULSES 


177777 060000 #-1 ,BUFO SET BUFO LOC. TO WORD -1 
019000 161570 #B1T12,aSFR ;ALLOW 1 TRANSFER 


161546 001126 acSR,$BDDAT ;READ STATUS 
020024 001124 #B1T13'BIT4'BIT2,$GDDAT ;LOAD EXPECTED STATUS 
001124 001126 $GDDAT , $BDDAT : COMPARE VALUES 
1$ :7BR IF SAME 
020220 ERROR 31 :‘CELL OVERFLOW’ FLOP FAILED TO SET 
sNOW GENERATE ‘’CLR ALL*’ TO CLEAR CELL OVERFLOW FLOP 
020222 004000 161526 i$: BIS aS ; GENERATE ‘‘CLR ALL" 
020230 161512 001126 MO *READ STATUS 
020236 000200 001124 ;LOAD EXPECTED 
020244 001124 001126 $GDDAT, $SBDDAT * COMPARE VALUES 
020252 2s ee SAME 
020254 ERROR 31 :"CLR ALL’ FAILED TO CLEAR ‘CELL OVFL** FLOP 
‘ 1 WORD CELL DATA 
020256 060000 001126 2$: MOV BUF 0, $BDDAT ;READ DATA 
0202 177777 +001124 ;LOAD EXPECTED 
001124 001126 SGDDAT. $BDDAT ; COMPARE 
TST117 ;:;BR IF SAME 
020302 31 





CZNCCA NCV11 
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020516 


177777 
000000 
020424 
020452 
010000 


161266 
020264 
001124 
004000 


002000 
161256 


MACY11 27(654) 8=AUG-78 


001126 
001124 
001126 


161246 
161260 


TIC 
CHECK FOR “CELL OVERFLOW'’ INTERRUPT 


E 6 
15:05 PAGE 57 


5 RRR REE KERR EERE REE EEE ERE REE EERE ERR ERE REE EER 


CHECK FOR "CELL OVERFLOW'’ INTERRUPT 


S*TEST 117 


RRR KEE EEKEEEKEREKE 


TST117: SCOPE 
MOV 


#40, $TIMES 
ACLRALL ,@SFR 
@BAR 


awCcR 


3:D0 40 ITERATIONS 


#BUF 0 , @OF F 
#BITS!BIT4!BIT2,aCSR 


#TSTDMA! TSTCON,@S 


#BI1TO,3ICSR 
ATESTZ.@SFR 
ATESTZ.@SFR 


#-1 ,BUFO 
#0,-(SP) 
#1$,-(SP) 


#2$,aVECTBO 
#B1T12.aSFR 


32 


3$ 
(SP)+, eae 
CSR, $BDDAT 


FR 


;CLEAR THE DEVICE 


;LOAD INITIAL OFFSET REGISTER 
sENABLE INTR. AND MATRIX MODE 
;SET TEST DMA AND CONTROL 
sENABLE THE DEVICE 

sENABLE "'TEST 2°" PULSES 
DISABLE ‘‘TEST 2°* PULSES 


;SET BUFO LOC. TO WORD -1 


;LOAD RETURN VECTOR 
ALLOW 1 TRANSFER 


:"'CELL OVERFLOW’ FAILED TO CAUES AN INTERRUPT 


;;BR TO CLEAN UP 


AD STATUS 


weir isiBIt/ BITS B1T6:B172, $GDDAT LOAD EXPECTED 


$GDDAT , $BDDAT 
3$ 


31 

ACLRALL ,@SFR 
VECTB1,aVECTBO 
ave CTBI 


;2BR IF 


;COMPARE VALUE 
ACTIVE’ CLEARED 
;ACTIVE'' FAILED TO CLEAR 
CLEAR THE DEVICE 
ZRESET THE VECTORS 





ams 
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020522 


020744 


020746 
020750 
020752 


020754 
020756 
020764 
020772 
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VERIFY CORRECT BR LEVEL THE NCV-11 SEQ 0070 


FRR EERE EERE RRA REREREERERERERRARREREREREREREE EER 
TEST 120 VERIFY CORRECT BR LEVEL THE NCV=-11 
SERRA AAA RRR E EERE EERE KERR ERE REEREEEREREERERERERREER ER 
7$T120: SCOPE 
040 MOV #40, $TIMES ;;D0 40 ITERATIONS 
002002 BRLEV,-(SP) :PUSH THE EXPECTED BR LEVEL ON STACK 
020544 #1$,-(SP) :PUST THE RETURN ADDRESS ON STACK 
;FAKE AN INTERRUPT TO BE LSI-11 AND PDP=11 COMPATABLE 
004000 WCLRALL,@SFR —_; CLEAR THE DEVICE 
020746 #10$,aVECTBO | ;LOAD UNEXPECTED INTERRUPT RETURN 


#340, aVECTB1 
@BAR INIT THE LOW Z COUNT 
awCR INIT THE HIGH Z COUNT 

ABUF 0 , 2OF F [PRIME THE OFFSET REGISTER 
#64, aCSR ;SELECT INTR. Sg MATRIX MODE 
#TSTDMA! TSTCON, aSFR MAINT. MODE 
#-1 ,BUFO PRIME THE TARGET LOCATION 
#8170, aCSR sENABLE THE NCV~11 
#TESTZ@SFR sENABLE ‘'TEST 2°" PULSES 
ATESTZ,ASFR [DISABLE "TEST Z'' PULSES 


o--OQWWw 
ALSMOALS 


#B1T12,aSFR ENABLE 1 TRANSFER 


BRLEV,RO GET CURRENT BR LEVEL 
#40,RO ZAND MAKE IT 1 LEVEL LOWER 
003354 NLSI11 TEST IF LSI-11 CPU 
2$ BR IF NOT 
RO ;LOAD BR LEVEL 0 
020754 161050 3 #20$,aVECTBO RELOAD TO EXPECTED VECTOR 
RO,-(SP) [PUSH ADJUSTED BR LEVEL 
020736 #3$,-(SP) [PUSH RETURN ADDRESS 
;LOWER CPU BR LEVEL 


42 zNCV11 FAILED TO INTERRUPT - INCORRECT NCV11 BR LEVEL? 
21$ ;:;BR TO CLEAN-UP 


raga eae WITH BR LEVEL INDICATED 
022626 10$: (SP)+,(SP)+ CLEAN THE STACK 
104042 ERROR 42 3NCV11_ INTERRUPTED ON AN INCORRECT BR LEVEL 
000401 BR 21$ :;BR TO CLEANUP 


EXPECTED INTERRUPT DID OCCUR 
022626 20$: CMP (SP)+, wo ;CLEAN THE STACK 
004000 160772 21%: MOV #CLRALL ,aSFR CLEAN THE DEVICE 
002000 161004 MOV VECTB1 ,aVECTBO ;RESET THE VECTOR 
005077 161002 CLR aVvECTBI 





on 
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CZNCCA.P11 T7121 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 13 


DEE EISIO SII SISISIDISISIIITOISIIISINIIITIOI IIIT IIIT ITO I TIT TT TT ASI SSS AM 
SRTEST 121 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 13 
ERIE IUOISI UO IIIIISISIIS II IIS ISISISISIISIOIOIIUICIOISISIOIOIOI IOI IIIT TTT 
020776 000004 181121: SCOPE 
021000 001160 MOV #100, $TIMES 3:D0 100 ITERATIONS 
;CLEAR THE DEVICE 


;LOAD THE OFFSET REG. 
;SET TEST DMA AND CONTROL 
;SELECT MATRIX WORD MODE 
ENABLE NCV11 
ENABLE “TEST Z** PULSES 
:DISABLE ‘‘TEST 2°’ PULSES 
= CLEAR THE TARGET LOCATION 
;ALLOW 1 WORD TRANSFER 
;LOAD EXPECTED ADDRESS 
#1,$GDDAT ;LOAD EXPECTED DATA 
@SBDADR , SBDDAT sREAD THE ACTUAL DATA 
$GDDAT , SBDDAT ; COMPARE 
TST122 3; BR IF SAME 
33 sOFFSET INPUT TO MATRIX MUX. SELECTED 
: THE WRONG ADDRESS - EXPECTED ADR. WAS 60000 
SR EEE IOS ITI IOIOIOI IOUS IIIT I TTT TTT TO 


VATEST 122 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 12 


SEQ 0071 


 @OF F 
#TSTDMA! TSTCON, aSFR 
#B1T4!BIT2,aCSR 
#B1T0,aCSR 
ATESTZ,ASFR 
ATESTZ,@SFR 
2460000 
#B1T12,aSFR 
#60000 , $BDADR 


001124 001126 


TTT TTT TITTLE TTL LETTE LETTE LLL LLL 


000100 001160 


160546 
160534 


001124 001126 
021254 


151122: SCOPE 
MOV 


#100, $TIMES 


. @OF F 
#TSTDMA! TSTCON, aSFR 
#B1T4'BIT2,aCSR 
#B1TO,aCSR 
ATESTZ,@SFR 
MTESTZ,@SFR 
a4#70000 
#B1T12,aSFR 
#70000 , $BDADR 
#1 ,SGDDAT 
@SBDADR , SBDDAT 
$GDDAT , $BDDAT 
TST123 


33 


::BR IF 


3:D0 100 ITERATIONS 


;CLEAR THE DEVICE 

;LOAD THE OFFSET REG. 

;SET TEST DMA AND CONTROL 
;SELECT MATRIX WORD MODE 
;ENABLE NCV11 
sENABLE "TEST 2°" PULSES 
:DISABLE ‘TEST Z°* PULSES 
;CLEAR THE TARGET LOCATION 

ZALLOW 1 WORD TRANSFER 

;LOAD EXPECTED ADDRESS 

z;LOAD EXPECTED DATA 

;READ THE ACTUAL DATA 

; COMPARE 

— 

FFSET INPUT TO MATRIX MUX. SELECTED 


7 THE uRONG ADDRESS ~ EXPECTED ADR. WAS 70000 


~— 


\, 





an 
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CZNCCA.P11 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 11 SEQ 0072 


FERRARA EEE EEE EERE RRR EERE EEE EERE EEE EERE ER EERE RE ER 


s*TEST 123 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 11 
SLR RRR RI EKER ERE EEE REE REE EERE 
021256 000004 TST123: SCOPE 
001160 MOV #100, $TIMES 7:D0 100 ITERATIONS 
#CLRALL ,@SFR oct 
#64000 , aOF F 
#TSTDMA! TSTCON,@SFR 
#B1T4'BIT2,aCSR ;SELECT MATRIX WORD MODE 
CSR ENABLE NCV cv11 
7 ENABLE “TEST Z** PULSES 
‘DISABLE “TEST Z'* PULSES 
a#640 ;CLEAR THE TARGET LOCATION 
#BIT12,aSFR TALLOW 1 WORD TRANSFER 
#64000, SBDADR ;LOAD EXPECTED ADDRESS 
#1,$GDDAT ;LOAD EXPECTED DATA 
@SBDADR , SBDDAT *READ THE ACTUAL DATA 
001126 SGDDAT , $BDDAT + COMPARE 
TST124 7;BR IF SAME 
33 sOFFSET INPUT TO MATRIX MUX. SELECTED 
; THE WRONG ADDRESS - EXPECTED ADR. WAS 64000 
FL II II IEEE KHER KEE EERE EERE REE REE KEKE 
Z*TEST 124 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET - 10 
LL REE KREEEKEEEEEKEREEEEEREEREEEKEEEEREEE EK 
TST124: SCOPE 
000100 001160 MO #100, $TIMES 7:D0 100 ITERATIONS 
004000 #CLRALL ,@SFR :CLEAR THE DEVICE 
#62000 , OF F ;LOAD THE OFFSET REG. 
#TSTDMA! TSTCON, @SFR :SET TEST DMA AND CONTROL 
#BIT4'BIT2,aCSR : SELECT MATRIX WORD MODE 
#B1TO,aCSR sENABLE NCV v11 
ATESTZ,ASFR ENABLE “TEST Z’* PULSES 
160266 ATESTZ,ASFR ;DISABLE ‘TEST Z** PULSES 
a462000 :CLEAR THE TARGET LOCATION 
160254 #B1T12,aSFR S ALLOW 1 WORD TRANSFER 
#62000, SBDADR ;LOAD EXPECTED ADDRESS 
#1, $GDDAT ;LOAD EXPECTED DATA 
@SBDADR , SBDDAT SREAD THE ACTUAL DATA 
001124 001126 SGDDAT , SBDDAT >; COMPARE 
E TST125 7 2BR IF _ 
104033 33 :OFFSET INPUT TO MATRIX MUX. SELECTED 
: THE WRONG ADDRESS - EXPECTED ADR. WAS 62000 
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000100 


001124 


001124 


001160 
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001160 


001126 
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MATRIX MODE XFR USING OFFSET 
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SEQ 0073 


FARRER ERR REE ERRKRIKREREEREEREREEEKRERERERERERR EH 


TATEST 125 


VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET 


- 


RRR EEE EK REE EEE RERKEEKKKKKKK 


1$1125: SCOPE 


SRTEST 126 


#100, ALL ast 3:D0 100 


, @OF F 
#TSTDMA! TSTCON, aSFR 
#B1T4!B1T2,aCSR 


ITERATIONS 

2CL EAR THE DEVICE 

;LOAD THE OFFSET REG. 
:SET TEST DMA AND CONTROL 
;SELECT MATRIX WORD MODE 


#B1T0,aCSR sENABLE NCV11 

ATESTZ,ASFR sENABLE "‘TEST 2°" PULSES 
ATESTZ,@SFR ;DISABLE ‘TEST Z** PULSES 
2461000 ;CLEAR THE TARGET LOCATION 
#B1T12,aSFR ZALLOW 1 WORD TRANSFER 
#61000, $B8DADR ;LOAD EXPECTED ADDRESS 

#1 ,$GDDAT ;LOAD EXPECTED DATA 
@SBDADR , $BDDAT READ THE ACTUAL DATA 
SGDDAT , SBDDAT ; COMPARE 

TST126 ;:BR IF 


33 


SAME 
OFFSET INPUT TO MATRIX MUX. SELECTED 


; THE WRONG ADDRESS - EXPECTED ADR. WAS 61000 


PSSST TTT e TTT TTT TT TTT TT TET TTTTTTTTT TTT TTT TT TTT TTT TTT TTT 


VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET 


- 08 


KERR KKK EEK KEKEKEKEEEEKEREEEKEEEKKEKEKKEKKEKEKKK 


181126: SCOPE 


#100, $TIMES 32DO0 100 


, @0F F 
#TSTDMA! TSTCON, aSFR 
#81T4!B1T2,aCSR 


ITERATIONS 
;CLEAR THE DEVICE 
[LOAD THE OFFSET REG. 


[SET TEST DMA AND CONTROL 


;SELECT MATRIX WORD MODE 


#B1ITO,aCSR * ENABLE NCV11 

#TESTZ,A@SFR * ENABLE “TEST Z*' PULSES 

MTESTZ,ASFR : DISABLE “TEST Z'* PULSES 
a#604 00 :CLEAR THE TARGET LOCATION 

#B1T12,aSFR TALLOW 1 WORD TRANSFER 

#60400, $BDADR ;LOAD EXPECTED ADDRESS 

#1, $GDDAT ;LOAD EXPECTED DATA 

@SBDADR , $BDDAT ;READ THE ACTUAL DATA 

$GDDAT, $BDDAT >; COMPARE 

TST127 7 7BR IF ny 


33 


SET INPUT TO MATRIX MUX. SELECTED 


; OFF 
;THE WRONG ADDRESS = EXPECTED ADR. WAS 60400 


J 6 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=-AUG-78 15:05 PAGE 62 C2 
CZNCCA.P11 T127 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 07 SEQ 0074 C2 


FL RARER REE ERE ER ERE REAR EERE ER EERE EER EERE 
*TEST 127 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 07 
SLI IKE REE EKER ERR EEE ERE REE ERE EE 
022016 000004 $1127: SCOPE 
001160 MOV: #100, STIMES ;;D0 100 ITERATIONS 
ER CLEAR THE DEVICE 
0, a0F F [LOAD THE OFFSET REG. 
#TSTDMA! TSTCON, @SFR 7SET TEST DMA AND CONTROL 
#BIT4!BIT2,aCSR :SELECT MATRIX WORD MODE 


157656 
a#60200 ZCLEAR THE TARGET LOCATION 
157644 ZALLOW 1 WORD TRANSFER 
[LOAD EXPECTED ADDRESS 
;LOAD EXPECTED DATA 
READ THE ACTUAL DATA 
001124 001126 $GDDAT , SBDDAT ; COMPARE 
TST130 7;;BR IF SAME 
022144 33 sOFFSET INPUT TO MATRIX MUX. SELECTED 
;THE WRONG ADDRESS - EXPECTED ADR. WAS 60200 
PUTT TTT TT TTT TTT TIT TTTTITITTT LETT TTT TLL 
TRTEST 130 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET =- 06 


TEESE III IIISISIIOIIOIOIIOIIIOIOIOIII IOI IOI III IO 


022146 000004 TST130: SCOPE 
MOV #100, $TIMES ::D0 100 ITERATIONS 
R sCLEAR THE DEVICE 
,@OF F ;LOAD THE OFFSET REG. 
#TSTDMA!TSTCON, @aSFR ;SET TEST DMA AND CONTROL 
#B1T4'BIT2,aCSR s SELECT aol WORD MODE 
#B1T0,aCSR TENABLE N cv11 
MTESTZ,ASFR ENABLE TEST Z** PULSES 
157526 ATESTZ,ASFR ;DISABLE ‘‘TEST 2°' PULSES 
2460100 :CLEAR THE TARGET LOCATION 
157514 #B1T12,aSFR TALLOW 1 WORD TRANSFER 
001122 #60100, S$BDADR ;LOAD EXPECTED ADDRESS 
001124 #1, $GDDAT ;LOAD EXPECTED DATA 
001126 @$BDADR, SBDDAT :READ THE ACTUAL DATA 
001126 $SGDDAT, $BDDAT ; COMPARE 
TST131 :7BR IF —s 
022274 33 FFSET INPUT TO MATRIX MUX. SELECTED 
THE ural ADDRESS - EXPECTED ADR. WAS 60100 
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001160 


001126 


001160 


157246 
157234 
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MR ARS AAAARASALASAAAL ALAA ALLS SSS | 


;*TEST 131 VERIFY A 1 WORD 


MARS ASAAASSAAA RASS ALES A SESE SSS 


181131: SCOPE 
MOV #100, $TIMES 
@SFR 


, @OF F 
#TSTDMA! TSTCON, 
#B1T4'BIT2,aCSR 
#BITO,acs 
ATESTZ,aSFR 
#TESTZ,@SFR 
a#60060 
#B1T12,aSFR 
#60040, $BDADR 
#1,$GDDAT 
@SADADR , $BDDAT 
SGDDAT , $BDDAT 
TST132 

33 


JL ERE EERE KEKKEKEEKEKEEKEK 


2*TEST 132 VERIFY A 1 WORD 


SEEKER KKKKEKKEKEKEKEEKEEKEEKKKK 


781132: SCOPE 
MOV #100, STIMES 


$GDDAT , $BDDAT 
TST133 
33 


63 


05 SEQ 0075 


REEREKKEKKEREEREREEKEKKEKEKKEKEEKK 


MATRIX MODE XFR USING OFFSET = 05 


REKKKEKEREEEEEEEEKERKEKEEREEKEEEKKKEEKEEK 


z:D0 100 ‘ITERATIONS t 
:CLEAR THE DEVICE 

:LOAD THE OFFSET REG. ' 

:SET TEST DMA AND CONTROL . 
:SELECT MATRIX WORD MODE 
sENABLE NCV11 

ENABLE "‘TEST 2°' PULSES 
[DISABLE ‘TEST 2°’ PULSES 
*CLEAR THE TARGET LOCATION 
TALLOW 1 WORD TRANSFER 
sLOAD EXPECTED ADDRESS 
:LOAD EXPECTED DATA 
:READ THE ACTUAL DATA 
: COMPARE 

:;BR IF SAME 

sOFFSET INPUT TO MATRIX MUX. SELECTED 

:THE WRONG ADDRESS = EXPECTED ADR. WAS 60040 
KERKKKKKKKEKEKREEAKKKEEEKKKEEKKEKKKKKKKE 
MATRIX MODE XFR USING OFFSET = 04 


KREKKKKEKREKEKKEKKEKKEEKKEKEKEEEKEEEKEKKKKKE 


::D0 100° ITERATIONS 


@aSFR 


T TEST 
sSELECT MATRIX WORD MODE 
ENABLE NCV11 
TENABLE “TEST Z** PULSES 
;DISABLE ‘TEST Z°* PULSES 
;CLEAR THE TARGET LOCATION 
;ALLOW 1 WORD TRANSFER 
;LOAD EXPECTED ADDRESS 
;LOAD EXPECTED DATA 
eee By ACTUAL DATA 


:3BR IF —_ 
OFFSET INPUT TO MATRIX MUX. SELECTED 
;THE WRONG ADDRESS - EXPECTED ADR. WAS 60020 
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CZNCCA.P11 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 03 SEQ 0076 


5 RII IIR IR IRIE RRR EEE EER 


T*TEST 133 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET = 03 


RRR EEKEKKEEKEKREKEKEKEEKKEKEKEEKEKRRKEEKEEKEKEEKKKE 


022556 000004 1$1133: SCOPE 
022560 MOV 


#100, STIMES ::D0 100 ITERATIONS 
:CLEAR THE DEVICE 
“LOAD THE OFFSET REG. 
‘SET TEST DMA AND CONTROL 
wB1T4'B1T2, acsR SELECT MATRIX WORD MODE 
#BITO.acs TENABLE NCV11 
WIEST OSFR ‘ENABLE MEST 12, PULS ES 
#TESTZ,@SFR “DISABLE ‘TEST 2°’ PULSES 
a#60010 ‘CLEAR THE TARGET LOCATION 
#B1T12,aSFR ‘ALLOW 1 WORD TRANSFER 
‘LOAD EXPECTED ADDRESS 
‘LOAD EXPECTED DATA 
“READ THE ACTUAL DATA 
001126 $GDDAT , $BDDAT > COMPARE 
TST134 7:BR IF SAME 
33 ZOFFSET INPUT TO MATRIX MUX. SELECTED 
: THE WRONG ADDRESS - EXPECTED ADR. WAS 60010 
[EA EOSIN IOI SOIC ITIOIIOIOISOITIO OO TOI TT TT ITT TTT TT 
SeTEST 134 VERIFY A 1 WORD MATRIX MODE XFR USING OFFSET - 02 


FLEA EREEEEEREEEEEEKEERREKEE 


TST134: SCOPE 
MOV #100, $TIMES 32D0 100 ITERATIONS 
:CLEAR THE DEVICE 
- @OF F [LOAD THE OFFSET REG. 

#TSTDMA! TSTCON, @SFR ;SET TEST DMA AND CONTROL 
#B1T4!BIT2,aCSR ZSELECT MATRIX WORD MODE 
#B1T0,aCSR ; CV 
ATESTZ.ASFR 


ATESTZ,@SFR I 
a4#40004 “CLEAR THE TARGET LOCATION 
#B1T12,aSFR ZALLOW 1 WORD TRANSFER 
#40004, _— ;LOAD EXPECTED ADDRESS 
#1 ,SGDDAT ;LOAD EXPECTED DATA 
@SBDADR , $SBDDAT [READ THE ACTUAL DATA 
001126 $GDDAT , $BDDAT ; COMPARE 
TST135 :-BR IF ry | 
33 OFFSET INPUT TO MATRIX MUX. SELECTED 
;THE WRONG ADDRESS ~ EXPECTED ADR. WAS 40004 
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CZNCCA.P11 


STIC 65 
VERIFY THE ADM INPUT TO THE MATRIX MUX. USING GAIN ENABLE 


SEQ 0077 


FL RRR REE REE EERE REE REE REE EERE EKER 


SeTEST 135 


VERIFY THE ADM INPUT TO THE MATRIX MUX. USING GAIN ENABLE 


SLR RRR EEE ERE RRR EERE EEE EKER ERE REE EERE EER 


TS1135: SCOPE 


001160 MOV #10, STIMES ;D0 10 ITERATIONS 


s;WITH GAIN SET IN TEST CONTROL ModE, THE 


SELF TEST DATA eis BE BYTE 250 


;WHEN PROCESSED THRU THE ADDRESS MAKER ee THE NEW etches a > 


VERIFY THAT THE MATRIX MUX CAN ADD 62550 


156702 MOV R CLEAR T 
56666 


te Be 
E DEVICE 
; LOAD THE. OFFSET REG. 


ZSET TEST DMA AND CONTROL 


#B1T12,aSFR 


re AHS $BDADR 
#1 ,SGDDAT 
@SBDADR , SBDDAT 


7 ENABLE Ne WORD MATRIX MODE 
sENABLE THE NCV11 

sENABLE * ‘TEST et PULSES 

:DISABLE ‘TEST Z'' PULSES 

;CLEAR THE TARGET ADDRESS 

CLEAR THE TARGET ADDRESS IF ‘‘TESTX’’ FAILS 
SALLOW 1 TRANSFER 


;LOAD THE EXPECTED ADDRESS 
;LOAD THE EXPECTED DATA 
;READ THE ACTUAL DATA 


001126 $GDDAT , SBDDAT — 
TEST OTHER ADDRESS 
NON-ZER 


:BR IF 


0 
MODE ADD 


33 MATRIX ER ERROR 
wey GAIN AND WORD MATRIX MODE, THE ADDRESSES SELECTED WAS INCORRECT 


TST ee 
@ABUF 0+2722 , SBDDAT 
eae 


001126 1$: 


023222 
;"'TESTX’® 


;LOAD INCORRECT DATA 


:CLEAR THE EXPECTED DATA 
RIX MODE ADDER ERROR DUE TO 


MAT 
LOGIC SET IN ERROR 
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CZNCCA.P11 VERIFY THE ADM INPUT TO THE MATRIX MUX. ADDER USING ZB ENABLE SEQ 0078 


FERRER ERE REE REE EERE REE EERE EERE EERE ERE EERE 
;*TEST 136 VERIFY THE ADM INPUT TO THE MATRIX MUX. ADDER USING ZB ENABLE 
MORACEAE AALALAAZALCALACALASAAAAAAASEE EASA AEE EEE EEE ESSERE RES RRR SG 
023224 000004 7$1136: SCOPE 
023226 001160 MOV #10, $TIMES :D0 10 ITERATIONS 
;WITH 7B ENABLE SET IN TEST CONTROL MODE, THE SELF TEST DATA SHOULD BE BYTE 224 
‘WHEN PROCESSED THRU THE ADDRESS MAKER LOGIC THE NEW VALUE IS 12450 
:VERIFY THAT THE MATRIX MUX CAN ADD CORRECTLY 
156514 MOV #CLRALL L,asFR CLEAR THE DEVICE 
1565 #BUF 0+5224 ,a0 “LOAD THE OFFSET REGISTER 
ATSTDRA'TSFCON, asFR TR 
#4024,aCSR 
#TESTZ,aSFR 


; — NCV11 
DISABLE ‘TEST Z°* PULSES 
;CLEAR THE TARGET LOCATION 
2,a TALLOW 1 TRANSFER 
MBUF 0+ 2450, $BDADR LOAD THE EXPECTED ADDRESS 
#1,$GDDAT sLOAD THE EXPECTED DATA 
@SADADR , $BDDAT “READ THE ACTUAL DATA 
001126 SGDDAT , SBDDAT ; COMPARE 
TST137 77BR IF SAME 
023352 33 ‘ADM INPUT TO THE MATRIX MUX SELECTED 
z;WRONG ADDRESS = EXPECTED ADDRESS WAS BUFO + 2450 
Fe robetatabatatatodototototetelahabetalolateteteletalalatlsbatctatcieteipbinighicigicieiiatteheteiohtobtebeiniahaiata 
*RTEST 137 VERIFY LOW BYTE OPERATION OF THE ‘‘TESTX’’ FLOP 


SKA KEEKEEKEKEEEEKEKEKRKEEEEKEEEKEKEEKEEEEEKEKEKKKKKEKKKKKKKKKK 


023354 000004 1$1137: SCOPE 
MOV #10, $TIMES 7:D0 10 ITERATIONS 

ACLRALL ,@SFR ;CLEAR THE DEVICE 

#BUF 0, OF F ;LOAD OFFSET REG. 

#TSTDMA! TSTCON, @SFR sLOAD TEST DMA AND CONTROL 

#2024,aCSR 7SET ‘'GAIN'' AND WORD MATRIX MODE 
3 SET NCV11 ACTIVE 
;ENABLE *'T 


156312 ; 

SCLEAR THE TEST FAILED LOCATION 
;CLEAR THE TESTX WORKED LOCATION 
156274 #B1T12,aSFR SALLOW 1 TRANSFER 


001124 #1,$GDDAT ;LOAD EXPECTED DATA 
001126 @#BUF 0+0152, S$BDDAT :READ THE ACTUAL DATA 
001126 SGDDAT, $BDDAT ;COMPARE DATA 

TST140 :;BR IF SAME 

geaurOvesse greet TESTX FAILED LOCATION 


BR IF YE 
= Ferien :TESTX FAILED TO INHIBIT BITS 8-15 OF THE ‘‘SUM ADDER" 
001126 1$: areUF +2552, separ GET ACTUAL DATA 


$GDDAT CLEAR EXPECTED 
023540 34 TESTX FAILED TO INHIBIT BITS 8-15 OF THE *’SUM A 
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155770 
001122 
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001126 
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STIC 
VERIFY BIT 12 ADDER INPUT TO MATRIX MODE MUX 


J FEAR REE EEEREEEEEKEREREREREEEREREREEEREKEKEERERREEREEE 


;*TEST 140 


VERIFY BIT 12 ADD 


ER INPUT TO MATRIX MODE MUX 


WR ARAAASASAASALALALLALASALASALASEASESSES LESS ALES ARRAS RASA AR DDS SS DS 


TST140: SCOPE 
MOV 


s*TEST 141 


TST141: 


SCOPE 
MOV 


tap diy ght A : 


2,9 
MEU 0+ 5736, $BDADR 
#1 ,SGDDAT 
@SADADR , $BDDAT 
$GDDAT , SBDDAT 
TST141 


33 


;;D0 100 ITERATIONS 
;CLEAR THE DEVICE 
;LOAD THE OFFSET REG. 
7SET TEST DMA AND CONTROL 
7 SELECT vt MATRIX BYTE MODE 


; E 
;CLEAR THE TARGET LOCATION 
TALLOW 1 WORD TRANSFER 
;LOAD EXPECTED ADDRESS 
;LOAD EXPECTED DATA 

[READ THE ACTUAL DATA 

OMPARE 


;;BR IF SAME 


sMATRIX ADDER FAILED TO SELECT CORRECT ADDRESS 


; THE WRONG ADDRESS - EXPECTED ADR. WAS BUFO+2726 


5 REE ERE EERE EERE EEK EEK EKEKEEEKEKEKEEKEKEEEEEEEEKEERKEEK 


VERIFY BIT 13 ADDER INPUT TO MATRIX MODE MUX 


FARRER EEE EERE EEE EERE KERR KEKE KEKKEKEKKEEKKKKK 


#100, ,STIMES : 


-@O0F F 
#TSTDMA! TSTCON, aS 
#2032,aCSR 
#31T0,aCSR 
ATESTZ,ASFR 
ATESTZ.ASFR 
oes iatk 
#B1T12,a 
weurOv5522, $BDADR 
#1 ,$GDD 
OSADADR, SBDDAT 
$GDDAT , $BDDAT 
TST142 : 
33 


;DO 100 ITERATIONS 
sCLEAR THE DEVICE 
;LOAD THE OFFSET REG. 
FR 7SET TEST DMA AND CONTROL 
;SELECT GAIN MATRIX BYTE MODE 
7; ENABLE NCV11 
+s ENABLE "TEST Z’* PULSES 
;DISABLE ‘TEST 2°* PULSES 
CLEAR THE TARGET LOCATION 
;ALLOW 1 WORD TRANSFER 
LOAD EXPECTED ADDRESS 
;LOAD EXPECTED DATA 
READ THE ACTUAL DATA 
s ARE 
;;BR IF SAME 
sMATRIX ADDER FAILED TO SELECT CORRECT ADDRESS 
:THE WRONG ADDRESS - EXPECTED ADR. WAS BUF0+5522 
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CZNCCA.P11 VERIF 317 14 ADDER INPUT TO MATRIX MODE MUX 


J EURO RRR AER EERE E EERE REE EREEREREREEEREREERERREEEREEREEER 
s*TEST 142 VERIFY BIT 14 ADDER INPUT TO MATRIX MODE MUX 
SEERA RRR RERE 

024022 TST142: SCOPE 

024024 001160 MOV #100, $TIMES 3:D0 100 ITERATIONS 
OFFSET = 50000 
;ADM OUTPUT 
; TARGET 236 

024032 004000 155716 MOV ;CLEAR THE DEVICE 

3727 001340 io'Ro IF ENOUGH MEMORY >20K 


7143 ; ROOM 
5672 . @OF F LOAD THE OFFSET REG. 
ATSTDMA! TSTCON,@SFR SSET TEST DMA AND CONTROL 
#2034 ,aCSR ;SELECT GAIN MATRIX BYTE MODE 
ENABLE NCV11 
TENABLE “TEST Z*’ PULSES 
DISABLE ‘TEST Z‘* PULSES 
;CLEAR THE TARGET LOCATION 
2,a SALLOW 1 WORD TRANSFER 
MBUE 03656, $BDADR ;LOAD EXPECTED ADDRESS 
#1 ,$GDDA ;LOAD EXPECTED DATA 
SSADADR, SBDDAT SREAD THE ACTUAL DATA 
001124 001126 $GDDAT , SBDDAT ; COMPARE 
E TST143 ;3BR IF SAME 
024160 33 ;MATRIX ADDER FAILED TO SELECT CORRECT ADDRESS 
;THE WRONG ADDRESS - EXPECTED ADR. WAS BUF0+43656 
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TIC 
CHECK FOR HIGH BYTE “INC OVFL** TO SET CELL OVERFLOW 


FF RAARRERRAAEAA RARE EERE EERERRARARRERERRRERRRERERERRRRRERERRERRS 


s*TEST 143 CHECK FOR HIGH BYTE “"INC OVFL'’ TO SET CELL OVERFLOW 
SERA RARE REE ERE EERE ER EERE RRR RRER EERE RRR EERE 
TST143: SCOPE 
000010 001160 MOV #10, $TIMES 32:D0 10 ITERATIONS 
004000 155556 MOV MCLRALL ,@SFR sCLEAR THE DEVICE 
155546 CLR awcR = CLEAR W.C. 
155544 CLR @BAR ;CLEAR B.A. 
060000 155532 MOV #BUF 0, AOF F LOAD INITIAL OFFSET REGISTER 
002022 155522 MOV #B81T10'BI1T4'BIT1, acsrR ;ENABLE MATRIX MODE BYTE AND SET GAIN 
000014 155524 MOV #TSTDMA!TSTCON, asFR zSET TEST DMA AND CONTROL 
000001 155506 BIS #BITO,aCSR sENABLE THE DEVICE 
000002 155510 BIS MTESTZ,ASFR ZENABLE “TEST Z** PULSES 
000002 155502 ot #TESTZ.ASFR DISABLE ‘‘TEST 2°' PULSES 
i 
000100 061264 MOVB #100, BUFO+1264 :LOAD LOW BYTE TO A KNOWN VALUE 
000377 061265 MOVB #377 ,BUFO+1265 :SET HIGH BYTE TO 377 
010000 155452 ot #BIT12,aSFR ;ALLOW 1 TRANSFER 
NOP 
022022 001124 MOV #B1T13'BIT10!BIT4!BIT1,$GDDAT ;LOAD EXPECTED STATUS 
155422 001126 MOV aCSR,$BDDAT ;READ THE ACTUAL STATUS 
001124 001126 CMP SGDDAT , SBDDAT ; COMPARE 
BEQ 1$ 7 :BR IF SAME 
ERROR 30 ;CELL OVERFLOW FAILED TO SET 
sWHEN INCREMEN;~ * THE HIGH BYTE 
061264 001126 1$: MOV BUF 0+1264 , $BDDAT ;READ 1 ~ sUFO LOCATION 
177500 001124 MOV #177500, $GDDAT ;LOAD EXPECTED VALUE 
001124 001126 CMP $GDDAT , $BDDAT > COMPARE VALUES 


BEQ TST144 ::BR IF SAME 
ERROR 30 ; TARGET LOC. DATA WAS INCORRECT 


) 


SEQ 0081 


CZNCCA 


NCV11 


CZNCCA.P 11 


624412 
024420 


DIAGNOSTIC 
7144 


000400 

050110 

000001 
012737 024420 
012777 


000001 
155224 
155244 
001124 


001124 


000400 
050110 


000001 


012737 024566 


012777 


000001 
155056 
155074 
001124 


001124 


MACY11 27(654) 
VERIFY EACH BIT 


001126 
001126 


tte «gat O80 
MIM MIA OO 
MOAM MLM Of 


T*TEST 144 


8-AUG-78 


—E 7 
15:05 PAGE 70 
OF THE LOWER 16 BIT Z COUNTER 


VERIFY EACH BIT OF THE LOWER 16 BIT Z COUNTER 


(TESTER ONLY) 


REAR R ARERR EERE EERE EEE REE EEE REE RE REE ERE ERE REE EERE ER 


(TESTER ONLY) 


SERRE ERE REAR EERE REE ERE RE REE REE ERE ERE ERE EER 


3:D0 400 ITERATIONS 


1S1144: SCOPE 
MOV 


3$: 


#400, $TIMES 
WF MODE 
TST145 


#1, $GDDAT 
#1$,$LPERR 


#CLRALL ,@SFR 
ATSTDMA,ASFR 


#0,aWwCR 
$GDDAT , @BAR 
@BAR 
#B1T4'BIT1,aCSR 
#B1TO,aCSR 


#BITO,aDACSR 
@DACSR 
2$ 


@BAR , $BDDAT 
ae 


; TEST IF TESTER MODE 


;;BR IF NOT 


;LOAD EXPECTED VALUE 
;LOAD LOOP ADDRESS 


:CLEAR THE DEVICE 
;SET TEST DMA FLOP 
: LOAD UPPER 16 BITS 


[LOAD INITIAL COUNTER VALUE 
MODE 


: LSE 

;WAIT FOR Z PULSE COMPLETION 

READ EXPECTED REGISTER VALUE 
OMPARE 


. 
° 


7;BR IF SAME 
:LOWER 16 BiTS OF THE Z COUNTER IN ERROR 


; CHANGE THE DATA BIT 
7BR AND TRY NEXT BIT 


BD I III I IIT IT IIIT ITT TIO IOS IOI TIO III TIO III IIIA II II III IA IIIS IN 


s*TEST 145 


VERIFY EACH BIT OF THE HIGHER 16 BIT Z COUNTER 


(TESTER ONLY) 


I REE EERE EKER KEKE EEK KEE EKKEKEEEKEEKEKEKE 


151145: SCOPE 
MOV 


4400, $TIMES 
WF MODE 


TST146 
#1, $GDDAT 
#1$,S$LPERR 


ACLRALL ,@SFR 
ATSTDMA,aSFR 
SGDDAT ,awCR 
awcR 

4-1 ,ABAR 
#B1T4!BIT1,aCSR 
#B1T0,aCSR 
ooh aDACSR 
aDAC 

2s 
aWCR,$BDDAT 

* opnesleneemtes 


3:D0 400 ITERATIONS 


7:BR IF N 


; TEST IF TESTER MODE 
OT 


;LOAD EXPECTED VALUE 
;LOAD LOOP ADDRESS 


:CLEAR THE DEVICE 
;SET TEST DMA FLOP 


*LOAD INITIAL COUNTER VALUE 
“LOAD LOWER 16 BITS 
ZENTER MATRIX MODE 
PULSE 
*WAIT FOR Z PULSE COMPLETION 


READ EXPECTED REGISTER VALUE 

; COMPARE 

SAME 

16 BITS OF THE Z COUNTER IN ERROR 


CHANGE THE DATA BIT 
7;BR AND TRY NEXT BIT 


SEQ 0082 





an 


ae 
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CZNCCA.P11 VERIFY THAT CAMERA 01 CHANNEL IS OPERATIONAL (TESTER ONLY) SEQ 0083 


TO RRARASASASAZASASSESZAAASESESLESAELAESL ES EES ESE TREES SRSA RRS RRS SSS SS 
tS TEST 146 VERIFY THAT CAMERA 01 CHANNEL IS OPERATIONAL (TESTER ONLY) 
TORR AAASASASAZASAESELASALASELESLELELES SESE ES ESET ESSER RRR RRR RAS RASS SY 

024702 000004 181146: SCOPE 

024704 000400 001160 Mov #400, STIMES ::D0 400 ITERATIONS 

024712 050110 wFMODE TEST IF TESTER MODE 

024716 TST147 ;;BR IF NOT 

024720 012737 001124 #1 ,SGDDAT :LOAD EXPECTED VALUE 


024726 012777 155022 2 ACLRALL ,@SFR ;CLEAR THE DEVICE 

#TSTDMA,ASFR ;SET TEST DMA FLOP 
#0,awCR = LOAD UPPER 16 are 
#0, @BAR ;LOAD LOWER 16 BIT 
#81T8'B1T4!BIT1,aCSR ZENTER MATRIX MODE on CAMERA 01 
#B1T0.aCSR sENABLE THE DEVICE 

000001 154726 #BITO,aDACSR GENERATE ‘'Z'' PULSE 

154722 $ os CSR ;WAIT FOR Z PULSE COMPLETION 


154742 001126 @BAR , SBDDAT READ EXPECTED REGISTER VALUE 
001124 001126 $GDDAT , SBDDAT ; COMPARE 
E TST147 73BR IF SAME 
025024 10 LOWER 16 BITS OF THE Z COUNTER 
IN ERROR WHEN USING CAMERA 01 


SRR RRR ER ERE REE EEE REE EEE EKER ERE REE REE EEEER RE EEE 


D*TEST 147 VERIFY THAT CAMERA 10 CHANNEL IS OPERATIONAL (TESTER ONLY) 


LTA RRR REE REE EKER EKER ERE KEKE REE REE EKER EEE ERE EEK ERK 


025026 000004 TST147: SCOPE 


000100 001160 MOV #100, $TIMES 3:D0 100 ITERATIONS 
050110 WF MODE TEST IF TESTER MODE 
TST150 ;3BR IF NOT 
012737 000001 001124 #1 ,$GDDAT ;LOAD EXPECTED VALUE 


012777 004000 154676 : ACLRALi ,@SFR ;CLEAR THE DEVICE 
000010 #TSTDMA,@SFR ; 
000000 #0,aWCR 
0000 


00 #0, @BAR 
001022 #B1T9!BIT4!BIT1,aCSR TENTER MATRIX MODE 
001 #B1T0,aCSR TENABLE THE DEVICE 
000001 154602 #B1T0,aDACSR GENERATE ‘'2"* PULSE 
154576 : ence R WAIT FOR Z PULSE COMPLETION 


2 
154616 001126 @BAR , $BDDAT READ EXPECTED REGISTER VALUE 
001124 001126 $GDDAT , SBDDAT ; COMPARE 
TST150 :7BR IF SAME 
025150 10 ;LOWER 16 BITS OF ne Z COUNTER 
IN ERROR WHEN USING CAMERA 10 





on 


CZNCCA NCV11 
CZNCCA.P11 


025152 


025170 
025176 


025274 


DIAGNOSTIC 


T150 


012737 
012777 


MACY11 27(654) 


G 7 
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VERIFY THAT CAMERA 11 CHANNEL IS OPERATIONAL (TESTER ONLY) 


000100 
050110 


000001 
154452 
154472 
001124 


001160 


001124 
154552 


SL RAAARRRA AERA E EERE EERE KERR RERAEREERRRRKERRAERREEERRERRERRE ERE 


S#TEST 150 


VERIFY THAT CAMERA 11 CHANNEL IS OPERATIONAL (TESTER ONLY) 


RRR REE ERK EKER EERE KEKE 


1$T150: SCOPE 
MOV 


#100, $TIMES :2D0 100° ITERATIONS 
WF MODE ;TEST IF TESTER MODE 
TST151 ;;BR IF NOT 


NO 
#1 ,$GDDAT ;LOAD EXPECTED VALUE 


ACLRALL ,@SFR ;CLEAR THE DEVICE 
a 
#0,awWCR 


#0, aBAR ;LOA 

#81T9'B1T8!BIT4!BIT1, acsR 
#B1T0,aCSR 
ab @DACSR ZGENERATE ‘'2'' PULSE 

ee ;WAIT FOR Z PULSE COMPLETION 
@BAR , $BDDAT READ EXPECTED REGISTER VALUE 
$GDDAT , $BDDAT ; COMPARE 


TST151 ::BR IF SAME 
10 16 BITS OF THE Z COUNTER 
7IN ERRORS aan USING CAMERA 11 





an 


CZNCCA NCV11 
CZNCCA.P11 


025276 
025300 


025306 
025314 
025322 


025546 


012777 
012777 


000002 


060000 
020000 
025330 


060000 
125252 
903352 


177770 


154256 
060224 


060000 
050114 
got ise 


001124 


H 7 
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MATRIX MODE ADDRESS 


001160 


050114 
025662 
001110 


022534 


154370 
154354 
154350 


154342 
154324 
154326 
154310 


154274 


001126 
001124 


001124 
001126 


SEQ 0085 


DRESS IOI ISIS IIISISIIIOIIUIIIIDITIOIIICITIUIIOITIOITIOITII III IIT IIIA IIIA 
z*TEST 151 DYNAMIC MATRIX MODE ADDRESS 


RRR KR RE EEK RKKEEKKEEEEEKEREREERKEEEKREKEKE 


TST151: SCOPE 
;D0 2 ITERATION 


MOV #2, $TIMES 
:CELL INCREMENT OF A FLOATING LOCATION (60000, 70000, 64000,62000,61000) 
“FILL THE MEMORY BUFFER WITH A KNOWN PATTERN (125252) 
“COLLECT DATA OF 0 AND INCREMENT A TARGET LOCATION 
‘VERIFY THAT NO OTHER ADDRESS IS CHANGED 
ZAFTER VERIFYING THE WHOLE BUFFER - UPDATE THE OFFSET REGISTER 

AND INCREMENT ANOTHER LOCATION 

MOV #BUFO,CURENT | ;PRIME THE CURRENT TARGET LOC. 

MOV iris: 100$ ‘LOAD FORCE BIT 

‘LOAD RETURN ADDRESS 


MOV #2$,SLPERR 
— “ae BUFFER WITH A 125252 PATTERN 


;LOAD us TO BUFFER 


3$: 


A#BUFO,RO 
#125252,R1 
ADNOKT , R2 
R1,(RO)+ 


° 


3$ 
#-10,aCURENT 


A#CLRALL ,@SFR 
CURENT , @OF F 
#-1 ,awCR 
@BAR 
ATSTCON,@SFR 
#24 ,aCSR 
ATESTZ,ASFR 
#B1T0,aCSR 


#4,RO 


4$ 
aCSR,$BDDAT 


RO, $BDADR 
(RO) , $BDDAT 


#125252, $GDDAT 
+ deerme 


33 
TST152 


LOAD VALUE 
;LOAD BUFFER END ADDRESS 
;LOAD BUFFER WITH DATA 


[TEST FOR END 
PRIME THE TARGET LOCATION 


INIT THE DEVICE 

;LOAD OFFSET TO TARGET 

PRIME THE HIGH 16 BIT Z COUNTER 
;CLEAR LOW 16 BIT COUNTER 
sENABLE TEST CONNECTOR 

;LOAD MATRIX WORD MODE 

;SET TEST Z FLOP 

ENABLE THE NCV11 


;PRIME THE DELAY 


R1 
#B1T14!BI71_,aCSR 
5$ 7:BR IF EITHER IS SET 
; DELAY 


TEST FOR CELL OR Z OVERFLOW 


DELAY 

READ BAD STATUS 
#B1T14!B1T13+224, 
2 DYNAMIC MATRIX MODE STATUS ERROR 


[GET BUFFER POINER 


$GDDAT ;LOAD EXPECTED STATUS 


s TEST IF TARGET ADDRESS 
:;BR IF YES 

:GET BA _ a FOR TYPE-OUT 

; LOAD OE KPECTED DATA 

; COMPARE 


:;BR IF SAME 
CHANGED AN INCORRECT TARGET LOCATION 





CZNCCA NCV11 
CZNCCA.P11 


025550 
025556 
025564 
025572 
025600 
025602 
025604 
025610 
025612 


025674 
025702 
025710 


025716 


DIAGNOSTIC 
T7151 


013737 


000004 
012737 


012737 
012737 
012737 


012700 


005301 


DYNAMIC 


050114 
022332 
003407 
001124 


003352 


001202 
004000 
025662 
000002 


060000 
025662 


000002 


060000 
020000 
025716 
060000 
125252 
003352 


004000 


. 
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MATRIX MODE ADDRESS 


001122 
001126 
001124 
001126 


153312 


025662 


050114 
050114 


001160 


050114 
026242 
001110 


154010 


153744 


C R1 
153720 4$: mB 1T14:81113, ae 


#2$,$LPERR 
PRIME THE “BUFFER WITH A 125252 PATT 
2$: MOV FO,RO 


7$: CURENT,$BDADR  ;LOAD EXPECTED ADDRESS 
MO @CUREN: , SBDDAT LOAD ACTUAL DATA 
#3407 , SGDDAT LOAD EXPECTED DATA 
$GDDAT , SBDDAT = COMPAR E 
10$ :sBR IF SAME 


(RO)+ ;BUMP THE POINTER INTO THE BUFFER 
ADNOKT ,RO TEST IF FINISHED THE BUFFER 
6$ ;BR AND RETEST THE REST OF THE BUFFER 


TEST IF FIRST PASS 

sR IF YES 

:TEST INHIBIT INTER. 
IF SET 


CHANGE THE FORCED ADDR. BIT 
s TEST IF FINISHED 
BR IF FINISHED 

#BUF 0, CURENT MAKE UP NEW ADDRESS 

aac pate : 


100$: 
LER RRR ERR EEE EERE ERR EKER EEE EERE EERE EEE REE REE EER EK 
s*TEST 152 DYNAMIC LIST MODE ADDRESS 


FLERE EERE EERE REE EEE EERE EKER ERE EEEKRERERER EERE 


1ST152: SCOPE 
MOV #2.$TIMES :DO 2 ITERATIONS 

:FILL THE MEMORY BUFFER WITH A KNOWN PATTERN (125252) 

‘DO A 1 WORD TRANSFER TO A TAGET LOCATION 

‘VERIFY THAT NO OTHER LOCATION IN THE BUFFER IS CHANGED 

“AFTER VERIFYING BUMP THE BUS ADDRESS AND DO SUB-TEST AGAIN 
MOV WBUFO,CURENT | ;:PRIME THE CURRENT TARGET LOC. 
mov #B1T13, 1008 *LOAD FORCE BIT 

;LOAD ae TURN ADDRESS 


;LOAD POINTER TO BUFFER 
#125252,R1 ;LOAD VALUE 
ADNOKT ,R2 ;LOAD BUFFER END ADDRESS 
3$: R1,(RO)+ ;LOAD BUFFER WITH DATA 
no eRe TEST FOR END 


ACLRALL ,@SFR INIT THE DEVICE 
#-1,awCR PRIME THE WORD COUNT 
CURENT , @JAR LOAD TARGET LOCATION POINTER 
;ENABLE MAINT. MODE 
SENABLE THE NCV11 
. sENABLE "TEST 2'* PULSES 
ATESTZ,@SFR DISABLE ‘TEST Z** PULSES 


#4 RO ;PRIME THE DELAY 
TEST FOR CELL OR Z OVERFLOW 


R IF EITHER IS SET 
R1 recA 





an 


mimes 


CZNCCA NCV11 
CZNCCA.P11 


026170 
026172 


026242 


DIAGNOSTIC 


T152 


000626 
020000 


DYNAMIC 


153702 
060224 


060000 
050114 


001124 


003352 


001202 
004000 


026242 
000002 


060000 
026242 


MACY11 27(654) 


8-AUG-78 


LIST MODE ADDRESS 


001124 
001126 


001122 


001126 


152732 


026242 


050114 
050114 


BR 
BIT13 


CURENT ,RO 
7$ 


RO, $BDADR 

(RO) , $BDDAT 
Wo5dee, $GDDAT 
$GDDAT, $8DDAT 
10$ 
21 
TST153 
CURENT , $BDADR 


ADNOKT ,RO 
6$ 


$PASS 
TST153 
#SW11,aSWR 
TST153 


#BUF 0, CURENT 
+ a tein 


J 7 
15:05 PAGE 75 


SEQ 0087 


; DELAY 


READ BAD STATUS 
“SGDDAT ;LOAD EXPECTED STATUS 
:DYNAMIC” LIST MODE STATUS ERROR 


GET BUFFER POINER 
+ TEST  d TARGET ADDRESS 


77;BR IF YE 
GET BAD aa FOR TYPE-OUT 
GET BAD DAT 
SLOAD EXPECTED DATA 
; COMPARE 
;7BR IF SAME 
: CHANGED AN INCORRECT TARGET LOCATION 


;LOAD EXPECTED ADDRESS 
;GET ACTUAL DATA 
= LOAD EXPECTED DATA 

2 try 


BR_IF SAME 
LIST MODE DATA ERROR 


“Bump THE POINTER INTO THE BUFFER 
TEST IF FINISHED THE BUFFER 
[BR AND RETEST THE REST OF THE BUFFER 


sTEST IF FIRST PASS 

:7BR IF FIRST PASS 

:TEST INHIBIT INTER. 

3;BR IF SET 

+ CHANGE THE FORCE ADDRESS 
sTEST IF END 
::BR IF FINISHED 
sMAKE NEW ADDRESS 





CZNCCA 


NCV11 


CZNCCA.P11 


HARES 


3419 


026244 


026310 
026312 


001357 


060000 
125252 
003352 


153342 
060200 


003352 


K 7 
MACY11 27(654) 8=AUG-78 15:05 PAGE 76 


001160 


153436 
153422 


153402 
153360 


001126 
001124 


001124 


LIST MODE TRANSFER = MAXIMUM BUFFER LENGTH IN LOWER 28K SEQ 0088 
J LRA ERR EEE EERE 
z*TEST 153 DYNAMIC LIST MODE TRANSFER = MAXIMUM BUFFER LENGTH IN LOWER 28K 
SL IIR ERE ERR ERR REE 
TST153: SCOPE 

MOV #40, $TIMES 33;D0 40 ITERATIONS 
MOV ADNOKT , RO ;GET LAST ADDRESS 
SUB #BUF 0,RO DETERMINE THE WORD COUNT VALUE 
nan ~ 
;PRIME 3 Flr dg A 125252 PATTERN 
2$: BUF ;LOAD aa TO BUFFER 
MOV #125280, R1 sLOAD V LUE 
MOV ADNOKT ,R2 ; LOAD BUFFER END ADDRESS 
3$: MOV R1,(R3)+ [LOAD BUFFER WITH DATA 
CMP R3,R2 ZTEST FOR END 
BNE 3$ 
sNOW COLLET THE LIST MODE DATA 
MOV AMCLRALL ,@SFR : INIT - DEVICE 
MOV RO,awCR [PRIME THE WORD COUNT 
MOV #BUF 0, @BAR ;LOAD TARGET LOCATION POINTER 
MOV #TSTCON,@SFR ENABLE MAINT. MODE 
BIS #B1TO,aCSR SENABLE THE NCV11 
BIS ATESTZ,ASFR oo MAINT. Z 
MOV #4 ,RO PRIME THE DELAY 
4$: BIT #81T14!B1T13, acsk TEST FOR CELL OR Z OVERFLOW 
BNE 5$ ;BR IF EITHER IS SET 
DEC R1 DELAY 
BNE 4$ 
DEC RO DELAY 
BNE 4$ 
MOV aCSR,$BDDAT sREAD BAD STATUS 
MOV #81114'B1T13+200.$GDDAT ;LOAD EXPECTED STATUS 
ae Pereee ; DYNAMIC LIST MODE STATUS ERROR - NO WORD COUNT OVERFLOW 
5$: MOV #BUF 0 ,RO GET BUFFER POINER 
6$: MOV RO, $BDADR [GET BAD “Te FOR TYPE-OUT 
MOV (RO) , SBDDAT 7GET BAD DAT 
MOV #3407, $GDDAT ;LOAD “EXPECTED DATA 


001126 


CMP SapDAr, - SBDDAT ; COMPAR 


BEQ ;BR_IF SAME 
ERROR 37 :LIST MODE DATA ERROR 
BR TST154 $2 


10$: TST (RO) + ;BUMP THE POINTER INTO oy BUFFER 
CMP ADNOKT ,RO :TEST IF FINISHED THE BUFFER 
BNE 6$ ;BR AND RETEST THE REST OF THE BUFFER 


C2 
C2 


CZNCCA NCV11 
CZNCCA.P11 


026760 


101254 


. oF 
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001160 


041772 
172346 
177572 
177572 


041756 
001122 


153140 
153116 


153062 
177572 
177572 
001126 


152176 


041772 
036402 041772 


DAS ESOS Oot itt 
Z*TEST 154 ONE MATRIX DATA 
SSSA IOI III I 
TST154: SCOPE 
MOV #2,$TIMES : 
TST $KT11 


BPL TST155 
;D0 A BYTE MATRIX MODE TRANSFER T 
: MEMORY BANK 


#600, 0UT 
1$: OUT, WK IPAR3 
#BUF 
Fi35282, (RO) 
#1400, a#SRO 
#370, (RO) 
#1400, a#SRO 


TIC 
ONE MATRIX DATA TRANSFER TO EACH 4K EXTENDED MEMORY SEQ 0089 


RERKEREEEEKEEEEKEEEEREKEEKEKKKEK 


TRANSFER TO EACH 4K EXTENDED MEMORY 


RERKEKEREKEEREKEEKEEEREEKEEKEKKEEKE 


;;D0 2 ITERATIONS 
s TEST IF KT=11 INSTALLED 
; ;BR NONE 


IF 
0 A 1 BYTE LOCATION IN EACH 4k EXTENDED 


LOAD INITIAL BANK _VALUE 

[LOAD KT-PAR 38 #3 <BUFFER IS AT LOC 60000> 
;LOAD BUFFER POINTER. 

[PRIME BAD TARGET LOC. 4 EXT ADD FAILS 
ENABLE MAINT. MODE KT~-11 

;LOAD TARGET LOCATION DATA VALUE 


[DISABLE MAINT. MODE KT-11 
;GET BANK VALUE 


;CLEAR EXT. ADD. TEMPORARY 
;MOVE LEFT 


;NOW GET READY TO DO THE TRANSFER 
MOV ACLRA ot @SFR 


R1,@0F F 
#B1T4'BIT1,aCSR 
#TSTDMA! TSTCON, aS 
#B1T0,aCSR 
ATESTZ,@SFR 
AMTESTZ,@SFR 

#371, $GDDAT 


$GDDAT , $BDDAT 
2$ 

35 

$PASS 

TST155 
#SW11,aSWR 
TST155 : 


#200, OUT 
+ het 


EA BITS 


EA BITS 

EA BITS FOR TYPEOUT 

ADDRESS BITS FOR TYPEOUT 
E COMPLETE ADDRESS 


deh THE NCV11 
COMBINED BUFFER ADDRESS 
‘ENABLE THE NCV11 
FR ENABLE MAINT NCV11 MODE 
;ENABLE THE NCV11 
sENABLE ‘‘TEST 2Z'* PULSES 
SDISABLE ‘TEST Z°' PULSES 
;LOAD EXPECTED DATA 
TENABLE 1 BYTE TRANSFER 
sENABLE KT-11 
3GET ACTUAL DATA 
;DISABLE KT-11 
: COMPARE DATA 
SAME 


IF 
DATA TRANSFER ERROR TO EXTENDED MEMORY 
OUNTER 


:2BR S 

:TEST IF INHIBIT INTER. 
;;BR IF SET 

;UPDATE BANK VALUE 
TEST IF DONE 

BR IF NOT 





M 7 
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CZNCCA.P11 ONE LIST DATA TRANSFER TO EACH 4K EXTENDED MEMORY 


DDS ISIS ISIISISIISISI INITIO IIIT IOI TT TT TOT TATA ITS AN 
z*TEST 155 ONE LIST DATA TRANSFER TO EACH 4K EXTENDED MEMORY 
EERIE SIOC II ISISIEI ISI IIIS IISISIDIIOIOIIIDIOIOIUIIOIIIOIIUIIOIIOIIUIIO IOS 
026762 000004 181155: SCOPE 
001160 MOV of tA ta ¢B0 2 ITERATIONS 
TST T11 s TEST IF KT=11 INSTALLED 
BPL TST 156 IF NONE 
:D0 A 1 WORD MODE TRANSFER T0 A i” "WORD BUFFER IN EACH 4K EXTENDED MEMORY BANK 
041772 MOV #600 ,OUT ;LOAD INITIAL BANK_VALUE <60000> 
172346 18: J BAK IPARS LOAD KT-PAR REG #3 <BUFFER IS AT LOC 60000> 
RO [LOAD BUFFER POINTER 
#7508, (RO) ;LOAD BAD TARGET LOC. IF EXT ADD FAILS 
177572 #1400, a#SRO ENABLE MAINT. MODE KT-11 
#125252, (RO) [PRESET THE TARGET LOCATION 
177572 #1400, a4#SRO DISABLE MAINT. MODE KT-11 
OUT Ri :GET BANK VALUE 
2 7CLEAR EXT. ADD TEMPORARY 


SAVE EXT. ADDRESS BITS 
027066 
027070 SAVE EXT. ADDRESS BITS 


;NOW GET READY TO DO THE TRANSFER 
027072 004000 152656 MOV ACLRALL ,@SFR INIT THE NCV11 


R2,@0F F [LOAD THE EXTENDED ADDRESS BITS 
152640 #-1,awCR LOAD WORD COUNT 
R1,aBAR LOAD BUS ADDRESS 
152632 #TS1DMA!TSTCON, asFR gee MAINT NCV11 MODE 
#B1')0,aCSR sENABLE THE NCV11 
#TESTZ,@SFR sENABLE ‘‘TEST 2°" PULSES 
152610 #TESTZ,aSFR ;DISABLE ‘TEST 2° PULSES 
R1,$8DADR ;SAVE TARGET ADDRESS 
R2,NARROW 7SAVE EA BITS FOR ERROR TYPEOUT 
152572 #B1T12,aSFR SENABLE 1 BYTE TRANSFER 
pat #3407, $GDDAT ;LOAD pestis DATA 


177572 #B1T0,a#SRO : 
001126 MP SGDDAT , SBDDAT ; COMPARE DATA 
2$ 77BR_IF SAME 
35 :LIST MODE DATA TRANSFER ERROR TO EXTENDED MEMORY 
SPASS OUNTER 
TST156 I 
151700 #SW11,ASWR STEST INHIBIT INTER. 
BNE TST156 7:BR IF SET 
041772 #200, 0UT UPDATE BANK VALUE 
041772 $LSTBK ,OUT TEST IF DONE 
027256 101253 1$ :BR IF NOT 





CZNCCA NCV11 
CZNCCA.P11 


027260 


027262 


027270 


027472 


N 7 
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T156 VERIFY BIT 15 MATRIX ADDER INPUT 


001160 


603140 
172346 


177572 


041756 
001124 
177572 


177572 
001126 


FERRARA RARER AERA REE REE EERE REREREEREERER ERR EH 


s*TEST 156 VERIFY BIT 15 MATRIX ADDER INPUT 


RARER REE EREREREREREEEEEEEEEEEEEEEEREKEEEEEEEEEKEEEREERERERREKEE 


151156: SCOPE 
MOV 


#100, STIMES 3:D0 100 ITERATIONS 
= 127657 


sTEST IF A IS AVAILABLE 
IF MORE MEMORY 


‘LOAD KTOPAR REG #3 <BUFFER IS AT LOC 60000> 
#BUF 0+56,RO [LOAD BUFFER POINTER 
#125252, (RO) [LOAD BAD TARGET LOC. IF EXT ADD FAILS 
#1400 ,a#SRO ENABLE MAINT. MODE KT~1 
(RO) ;LOAD TARGET LOCATION DATA VALUE 
#1400 ,a#SRO :DISABLE MAINT. MODE KT-11 


NOW GET READY TO DO THE TRANSFER 
MOV A#CLRAL INIT THE NCV11 
[LOAD COMBINED BUFFER ADDRESS 
TENABLE THE NCV11 
;ENABLE MAINT NCV11 MODE 
ENABLE THE NCV11 
’ zENABLE "‘TEST 2°" PULSES 
ATESTZ,@SFR DISABLE ‘‘TEST Z°* PULSES 


#B1T12,aSFR ENABLE 1 BYTE TRANSFER 


#1 ,NARROW ;SAVE EA BITS FOR ERROR TYPEOUT 
#400, $GDDAT ;LOAD EXPECTED DATA 
#B1T0,a#SRO ENABLE KT~-11 
(RO) , SBDDAT SAVE ACTUAL DATA 

:DISABLE KT~11 

se a DATA 


oe 


SAME 
:BIT 15 INPUT TO MATRIX MODE ADDER FAILED 





CZNCCA NCV11 
CZNCCA.P11 


027474 
027476 


027632 


001124 


TIC MACY11 27(654) 8=AUG-78 
VERIFY HIGH BYTE OPERATION OF THE 


MARASBAAALASLALALALALALALAAALASALALSA LARA RSA SARS RE AAL AS ASAD DS DD: 


VERIFY HIGH BYTE OPERATION OF THE ‘TEST Xx’’ 


MARAASALLAALALASALASLSAAASARA SEAS ASAE ASSES RSA RRR S ASR RAR SSS SG 


~peceigsiote 


001160 


152244 
001140 


152220 


001126 


SATEST 157 
1$1157: SCOPE 
MOV 


s TEST X 
ZOFFSET 


B 8 
15:05 PAGE 80 
“TEST x"’ 


2 
#CLRALL, @SFR 
$LSTBK #1140 
TST160 


TST 
34 


$GDDAT , $BDDAT 
T160 


sFAILED 


3:D0 40 ITERATIONS 


;CLEAR THE DEVICE 
TEST IF — 20k 


‘eet IF 
T BIT "5 OF OFFSET 
SFR ;SET TEST DMA, CONTROL AND TESTX 
;ENABLE THE NCV11 
sENABLE THE NCV11 
ENABLE ''TEST 2Z°* PULSES 
;DISABLE *‘TEST 2'' PULSES 
CLEAR THE TARGET LOC. 


SFER 
;LOAD EXPECTED ADDRESSES VALUE 
;LOAD EXPECTED VALUE READ 

fe a on age DATA 


;7BR_ IF SAME 
MATRIX ADDER INPUT OF ADM15 AND TESTX L 
TO BE INHIBITED 





CZNCCA NCV11 
CZNCCA.P11 


0277 
027702 


027710 


000100 


036402 


004635 
060026 
125252 
001400 


001400 


001124 
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001160 


005140 
172346 


177572 


041756 
001124 
177572 
177572 


001126 


STIC 
VERIFY BiT 16 INPUT TO THE MATRIX MODE ADDER 


= RRA EERE EERE REKEEEKEEKEKEKEKEERKKK 


S*TEST 160 VERIFY BIT 16 INPUT TO THE MATRIX MODE ADDER 


RRR KERR KEEREEREKEEEKKEEEKEKEEEEKKEKEREREKKKEEKEEKEKK 


TST160: SCOPE 
MOV 


3:D0 100 ITERATIONS 


s TEST IF ENOUGH MEMORY >84K 


TST161 :;BR_ IF NOT 

#4635 ,a#KIPAR3 :LOAD KT-PAR REG #3 <BUFFER IS AT LOC 60000> 
#BUF 0+26,RO ;LOAD BUFFER POINTER 

#125252, (RO) [LOAD BAD TARGET LOC. 

#1400 ,a#SRO ENABLE MAINT. MODE KT-11 

(RO) :PRESET THE TARGET LOCATION 

#1400, a4#SRO DISABLE MAINT. MODE KT~-11 


sNOW GET READY TO DO THE TRANSFER 
MOV ACLRALL, Pe ra INIT THE NCV11 

#10001, ;LOAD THE EXTENDED ADDRESS BITS 

#ISTDMA'TSTCON, asFR ENABLE MAINT NCV11 MODE 
#4036,aCSR ;LOAD MATRIX MODE AND ZB ENABLE 

#B1T0,aCSR SENABLE THE NCV11 

ATESTZ,@SFR sENABLE "TEST 2'* PULSES 

ATESTZ,ASFR DISABLE ‘TEST Z'* PULSES 


A#BIT12,aSFR sENABLE 1 BYTE TRANSFER 


#2 ,NARROW ;SAVE EA BITS FOR ERROR TYPEOUT 
#400, $GDDAT ;LOAD EXPECTED DATA 
AB SENABLE KT~11 
2 SAVE ACTUAL DATA 
#B1T0,a#SRO 
$BDDAT 
$GDDAT , $BDDAT 3 COMPARE DATA 
TST161 :BR IF SAME 
20 ‘BIT 16 INPUT TO MATRIX MODE ADDER FAILED 

































CZNCCA 


3665 
3666 


NCV11 


CZNCCA.P11 


030216 


000043 


000001 
050106 


043712 


001102 


030203 
001202 


030200 
000042 


377 


D 8 
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DETERMINE IF DIFLIN IS TO BE RUN ( 


001160 


001202 


3 FI III IR ITO ITI ITT IIT IIIT III SI SSAI SII IASISSIASISSISISSNIASSSSSON 


i*TEST 161 DETERM:NE IF DIFLIN IS TO BE RUN (F) 
TDI ESSE IO SISOS ISISIIISIISISISIIIIIOIIIOIOIIEIOIUIOIOITIOIIOOOII TT TOIT TT TTS OTE 
TST161: SCOPE 

MOV #1 ,$TIMES 33D0 1 ITERATION 


TST RUND IF TEST IF DIFLIN IS TO BE RUN 
BEQ $SEOP ;;BR_IF NOT TO BE RUN 
JMP DIFLIN ; JUMP AND RUN DIFLIN 

.SBTTL END OF PASS ROUTINE 


cman a gee ronan a a i aye ge 
“ kINCREMENT THE PASS NUMBER ($PASS 
;* INDICATE END-OF PROGRAM AFTER 1 PASSES THRU THE PROGRAM 
*TYPE ‘END PASS AXXXXX'’ (WHERE XXXXX IS A DECIMAL NUMBER) 
:*IF THERES A MONITOR GO TO IT 
:*IF THERE ISN'T JUMP TO LOGIC 


SEOP: 
SCOPE 
CLR $STSTNM ;;ZERO THE TEST NUMBER 
CLR STIMES 2 ZERO THE NUMBER OF ITERATIONS 
INC $PASS ; INCREMENT THE PASS NUMBER 
BIC #100000,$PASS += DON' T ALLOW A NEG. NUMBER 
DEC (PC) + 3;;LOOP? 
$EOPCT: .WORD 1 
BGT $DOAGN esVES 
MOV (PC)+,a(PC)+ 7 RESTORE COUNTER 
$ENDCT: .WORD 1 
SEOPCT 
TYPE ~ SENDMG ; TYPE “END PASS #°' 
MOV $PASS ,-(SP) +O SAVE $PASS FOR TYPEOUT 
TYPDS 2260 TYPE--DECIMAL ASCII WITH SIGN 
TYPE ~ SENULL TYPE A NULL CHARACTER 
$GET42: MOV a#42,R0 T:GET MONITOR ADDRESS 
BEQ $DOAGN : BRANCH IF NO MONITOR 
RESET :;CLEAR THE WORLD 
$ENDAD: JSR PC, (RO) ::GO TO MONITOR 
NOP 7; SAVE ROOM 
NOP 7iFOR 
NOP 3ZACT11 
SDOAGN: 
JMP a(PC)+ 7 RETURN 
$RTNAD: .WORD Lost 


SENULL: .BYTE NULL CHARACTER STRING 


000 
042412 042116 $ENDMG: .ASCIZ <iSacio>/END PASS’ #7 


051501 


020123 
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DIAGNOSTIC 
ERROR ASCII MESSAGES 


034115 


051105 


031060 
031460 


MACY11 27(654) 


047522 
004466 


051117 
033062 


047522 


026466 
004466 


EM1: 


8-AUG-78 


-SBTITL 
-ASCIZ 


eASCIZ 


eASCIZ 


E 8 
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ERROR ASCII MESSAGES 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


NCV11 BUS ADDRESS TIMEOUT/ 


COMMAND=STATUS REGISTER ERROR/ 


SPECIAL FUNCTION REGISTER ERROR/ 


WORD COUNT REGISTER ERROR/ 


BUS ADDRESS REGISTER ERROR/ 


OFFSET REGISTER ERROR/ 


DUAL REGISTER SELECTION ERROR/ 


/M8026-M80 36 LOW 16 BIT Z COUNT ERROR/ 


/M8026~-M80 36 HIGH 16 BIT Z COUNT ERROR/ 
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030654 044510 044107 030440 
030662 
030706 034115 Or One 004466 EM12: .ASCIZ /M8026 Z COUNT STATUS ERROR/ 


000 
030741 115 030070 033062 EM13: .ASCIZ /M8026 Z COUNT INTERRUPT ERROR/ 


030777 115 030070 033063 EM14: .ASCIZ /M8036 JOYSTICK STATUS ERROR/ 


3766 

3767 

3768 

3769 

3770 

3771 

3772 

3773 

3774 

3775 

3776 

3777 

3778 

3779 

3780 

3781 

3782 

3783 

3 

ch 34 ; 
3787 031033 115 030070 033063 EM15: .ASCIZ /M8036 JOYSTICK DATA ERROR/ 
sae 031040 045011 054517 052123 

3 031054 040524 042440 051122 

3791 031062 000 

3792 031065 115 030070 033063 EM16: .ASCIZ /M8036 DATA INCREMENT ERROR/ 
3793 031072 042011 052101 020101 

3794 
3795 
3 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3805 
3806 
3807 
3808 
3810 
3811 


031100 047111 051103 046505 
031106 047105 020124 051105 


031120 034115 031460 004466 EM17: .ASCIZ /M8036 DATA DECREMENT ERROR/ 
031126 040504 040524 042040 
031134 041505 042522 042515 
031142 052116 a 051122 


031153 115 030070 033062 EM20: .ASCIZ /M8026-M8036 MATRIX MODE ADDRESS MAKER DATA ERROR/ 
031160 033063 


031234 034115 031060 004466 EM21: .ASCIZ /M8026 LIST MODE ADDRESS MAKER DATA ERROR/ 
3812 031242 044514 052123 046440 


115 030070 033062 EM22: .ASCIZ /M8026 LIST MODE TRANSFER BUS ADDRESS ERROR/ 
031312 046011 051511 020124 


ODWNAOWULRW 
So 
Ww 
os 
a) 
N 
N 
o 
Ww 
S 
~ 
Oo 
Ww 
N 
. 
N 
a 
> 
Oo 


7a 
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031320 


031762 


DIAGNOSTIC 


MACY11 27(654) 


ERROR ASCII MESSAGES 


051122 
030070 


051105 
031060 


044440 


052040 


2523 
047522 
004466 


051122 
033062 


051105 
004466 


047522 
004466 


051122 
033062 


052116 


8-AUG-78 


G 8 
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/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


/M8026 


LIST MODE TRANSFER WORD COUNT ERROR/ 


LIST MODE TRANSFER OFFSET ERROR/ 


TIMEOUT STATUS ERROR/ 


TIMEOUT INTERRUPT ERROR/ 


SET "EVENT'' OR ‘‘TIME'' DATA ERROR/ 


CELL INCREMENT DATA ERROR/ 


CELL OVERFLOW STATUS ERROR/ 


CELL OVERFLOW INTERRUPT ERROR/ 





oe 
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CZNCCA.P11 ERROR ASCII MESSAGES 


031770 051105 052522 052120 
051122 051117 


030970 033062 
4522 


040504 
051122 051117 


046525 042520 


047505 
2 000 
032425 5 031070 033461 


/M8026 MATRIX MODE ADDRESS MUX ERROR/ 


/M8026 ‘‘'TESTX’’ FUNCTION ERROR/ 


/M8026 DATA ERROR WHEN TRANSFERING TO EXTENDED MEMORY/ 


/M8026 LIST MODE TRANSFER STATUS ERROR/ 


/M8026 LIST MODE TRANSFER DATA ERROR/ 


/ JUMPER=M8026-M7952 “EVENT'’ OR ‘'TIME’* MARK ERROR/ 


/M7952 CLOCK BUS ADDRESS TIMEOUT/ 


/M8217 INCORRECT INTERRUPT LEVEL/ 





an 
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CZNCCA.P11 ERROR ASCII MESSAGES 


044411 -041516 
2522 052103 
051105 
046040 
032462 000 
032465 051122 : . _ ZERRPC 
042104 
050122 : . 7ERRPC GOOD BAD/ 
051104 
004504 


050122 : ° /ERRPC GOOD BAD BADADR/ 


040504 
041520 : . /ERRPC EA ADR BADADR/ 
4522 


OUTRNG: .BYTE 12,7 
-AS ei 


15,12, 
CII /NO ‘'2"* PULSES OR / 


«ASCII /INPUT VOLTAGE OUT OF RANGE ON CHANNEL #/ 


047116 


012 OUTCHN: .BYTE 60,15,12,7,0 
032717 
-EVEN 


032722 000000 DT1: «WORD $ERRPC,$BASE,0 
001124 DT2: -WORD $ERRPC,$BASE,$GDDAT,$BDDAT,0 


001124 DT3: -WORD $ERRPC,$BASE,S$GDDAT.S$BDDAT ,$BDADR,0 


DT4: -WORD $ERRPC,$BASE,$GDDAT,$BDDAT ,NARROW, $BDADR ,0 
041756 001122 


001254 000000 DTS: -WORD $ERRPC,$CDW1,0 
DFO: -WORD 0 





ale) 
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CZNCCA.P11 TTY INPUT ROUTINE SEQ 0100 
re ~SBTTL TTY INPUT ROUTINE 
3977 CD RII IIISIISISISIOIOIIIIIIIIIIIIIIIOIIII TT TTT TOTTI TOI II TIT IO E 
pada -ENABL LSB 
3980 CDAD IIIS III III III IIIT IIR 
3981 + *SOF TWARE SWITCH REGISTER CHANGE ROUTINE. 
3982 + *ROUT INE IS ENTERED FROM THE TRAP HANDLER, D WILL 
3983 : *SERVICE THE TEST FOR CHANGE IN SOF TWARE Swi TCH REGISTER TRAP CALL 
3984 ;*WHEN OPERATING IN TTY FLAG MODE. 
3985 033004 022737 000176 001140 $CKSWR: CMP #SWREG, SWR 22S THE SOFT=SWR SELECTED? 
3986 033012 001074 BNE 15$ $e CH IF NO 
3987 033014 105777 146124 TSTB a$TKS 32CHAR THERE ? 
3988 033020 100071 BPL 15$ 77 1F NO, DON'T WAIT AROUND 
3989 033022 117746 146120 MOVB @$TKB,-(SP) 7 SAVE THE CHAR 
3990 033026 042716 177600 BIC #*C177, (SP) : STRIP-OFF THE ASCII 
3991 033032 022726 000007 CMP #7, (SP)+ 3721S IT A CONTROL G? 
3992 033036 001062 BNE 15$ 3zNO, RETURN TO USER 
3993 033040 123727 001134 000001 CMPB $AUTOB 41 ; ARE WE RUNNING IN AUTO-MODE? 
pe 033046 001456 BEQ 15$ 7-¢BRANCH IF YES 
3996 033050 104401 033531 TYPE -$CNTLG 7zECHO THE CONTROL-G (*G) 
3997 033054 104401 033536 $GTSWR: TYPE - SMSWR 32 TYPE CURRENT gta 
3998 033060 013746 000176 MOV SWREG,-(SP) 7zSAVE SWREG FOR TYPEOU 
3999 033064 104402 TYPOC 32GO TYPE--OCTAL ASCII CALL DIGITS) 
4000 033066 104401 033547 TYPE . SMNEW ;zPROMPT FOR NEW SWR 
4001 033072 005046 19$: CLR ~-(SP) ::CLEAR COUNTER 
4002 033074 005046 CLR - (SP) 33 THE NEW SWR 
4003 033076 105777 146042 7$: TSTB a$TKS 3;CHAR THERE? 
cons 033102 100375 BPL 7$ :71F NOT TRY AGAIN 
4006 033104 117746 146036 MOVB @$TKB,-(SP) 7zPICK UP CHAR 
pra 033110 042716 177600 BIC #*C177, (SP) 7zMAKE IT 7-BIT ASCII 
4009 
4010 
4011 933114 021627 000025 9$: CMP (SP) ,425 :z1S IT A CONTROL-U? 
4012 033120 001005 BNE 10$ 7; BRANCH IF NOT 
4013 033122 104401 033524 TYPE ~SCNTLU 7zYES, ECHO CONTROL-U (“U) 
4014 033126 062706 000006 20$: ADD #6,SP 32 IGNORE PREVIOUS INPUT 
4015 033132 000757 BR 19$ 77LET'S TRY IT AGAIN 
Zor? 
4018 033134 021627 000015 10$: CMP (SP) 415 i718 IT A <CR>? 
4019 033140 001022 BNE 16$ 7 BRANCH IF NO 
4020 033142 005766 000004 TST 4(SP) szYES. IS IT THE FIRST CHAR? 
4021 033146 001403 BEQ 11$ ;;BRANCH IF YES 
4022 033150 016677 000002 145762 MOV 2(SP) ,aSWR ZSAVE NEW SWR 
4023 033156 062706 000006 11$: ADD #6,SP 3:CLEAR UP ge 
4024 033162 104401 001171 14$: TYPE SCR RLF 7zECHO <CR> AND < 
4025 033166 123727 001135 000001 CMPB SINTAG. #1 Hin ee | TTY KBD INTERRUPTS? 
4026 033174 001003 BNE 15 BRANCH IF NOT 
4027 033176 012777 000100 145740 MOV #100, a$TKS : :REENABLE TTY KBD INTERRUPTS 


4028 033204 000002 15$: RTI 7 RETUR 


An 


CZNCCA NCV11 
CZNCCA.P11 


DIAGNOSTIC 


MACY11 27(654) 


TTY INPUT ROUTINE 


034604 
000060 


000967 


000060 
000002 


000002 
177776 


001170 


000004 
145642 


145636 
177600 
000004 
145610 
145604 
177600 
000021 
000004 
000004 


000040 


000002 


000004 
000004 
000023 


000140 
000175 
000004 


8-AUG-78 


16$: PC ,STYPEC 


17$: 


(SP) ,460 
18$ 

(SP) ,467 
18$ 

#60, (SP)+ 
2(SP) 


2(SP) 
-2(SP) , (SP) 


BR 
18$: .$QUES 
BR 20$ 
-DSABL LSB 


SRDCHR: MOV 
MOV 


K 8 
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SEQ 0101 
:ECHO CHAR 
HAR < 0? 


; CH IF YES 
: ESTRIP-OFF ASCII 
oe THIS : — CHAR 


CH 
:3NO, SHIFT PRESENT 


si TYPE ?<CR><LF> 
73SIMULATE CONTROL-U 


Paha ek kkk kde ka hehehehehe hehe hahahahelehelehahehehaheheheheheiehelehelslslelalaleiahehahehsheieleisieieleieielel 


RDCHR 
RETURN HERE 


(SP) ,-(SP) 
4(SP) ,2(SP) 


1$: es 
BP 


ere 4(SP) 
#*C<177>,4 (SP) 
4(SP) ,#23 
3$ 

as$TkS 

2$ 
a$TKB,-(SP) 
#°(177, (SP) 
(SP)+,4#21 
2$ 

1$ 

4 (SP) .#140 
4(SP) #175 


4$ 
#40,4(SP) 


4$: 


SRK KEKE EEEEKEKEKKEKEKEKEREEKEKEKEEKEEKKEEKEEEEEKEKEKEKEKEKKEEK 


at ROUTINE WILL INPUT A STRING FROM THE TTY 


RDLIN 
RETURN HERE 


SR THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


¢*CALL: 


33 INPUT A SINGLE CHARACTER FROM THE TTY 
3;CHARACTER IS ON THE STACK 
i;WITH PARITY BIT STRIPPED OFF 


PUSH DOWN THE PC 
73 SAVE THE PS 


TREAD THE TTY 
3:GET RID OF JUNK IF ANY 
ri1S IT A_CONTROL~S? 

CH IF NO 


7:WAIT FOR A CHARACTER 
;¢LOOP UNTIL ITS THERE 
3=GET CHARACTER 

37MAKE IT 7-BIT ASCII 
331S IT A_CONTROL~Q? 
s3iF _ DISCARD IT 


38 . RESUME 

31S IT UPPER CASE? 

ze CH IF YES 

7218S IT A SPECIAL CHAR? 
$3 H IF YES 


32 INPUT A STRING FROM THE TTY 
ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
3: TERMINATOR WILL BE A BYTE OF ALL O0°S 





L 8 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG=78 15:05 PAGE 90 
CZNCCA.P11 TTY INPUT ROUTINE SEQ 0102 


SRDLIN: MOV R3,~(SP) ;;SAVE R3 
033514 1$: MOV #$TTYIN,R3 GET ADDRESS 
033524 2$: ASTTYINGS. ,R3 ‘ IBUFFER FULL? 
4$ 7sBR IF YES 
3360 READ ie FROM THE TTY 


(SP)+,(R3) 
000177 : #177,(R3) 


001170 : . SQUES 3 j 
BR 1$ T:CLEAR THE BUFFER AND LOOP 
033512 : (R3) ,9$ ;sECHO THE CHARACTER 


033512 .9$ 
000015 #15, (R3)+ : CHECK FOR RETURN 

2$ OOP IF NOT RETURN 
177777 -1(R3) ZICLEAR RETURN (THE 15) 
001172 -SLF 22 TYPE A LINE FEED 

(SP)+,R3 7 ¢RESTORE R3 

(SP) ,~(SP) [:ADJUST THE STACK AND PUT ADDRESS OF THE 
000004 000002 4(SP) ,2(SP) i FIRST ASCII CHARACTER ON IT 
033514 000004 MSTTYIN,4(SP) a 


9$: 0 3 STORAGE FOR ASCII CHAR. TO TYPE 
0 ; TERMINATOR 
SIiviN: . 8. : :RESERVE 8 BYTES FOR TTY INPUT 
000 S$CNTLU: /*U/<15><12> ;CONTROL ‘U"' 
000012 $CNTLG: /*G/<15><12> FACONTROL — 
020122 $MSWR: .ASCIZ <15><12>/SWR = / 


040 053505 $MNEW: .ASCIZ / NEW = 
033554 000040 
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SEQ 0103 


.-SBTTL READ AN OCTAL NUMBER FROM THE TTY 


SLR RIE RIKER REE REE 


3*THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
;*CHANGE IT TO BINARY. 


;*CALL: 


-* 


° 

* 

** 
. 


$RDOCT: 
000004 000002 


177770 
000012 
033660 


RTI 
$SHIOCT: .WORD 


RDOCT 
RETURN HERE 


(SP) ,=(SP) 
4(SP) ,2(SP) 
RO,-(SP) 
R1,~(SP) 
R2,~-(SP) 


(SP)+,RO 
R1 


R2 
(RO) +,=(SP) 
3$ 


R2 
#*C7, (SP) 
le 


2 

(SP)+ 
R1,12(SP) 
R2,$HIOCT 
(SP)+,R2 
(SP)+,R1 
(SP)+,RO 


0 


7zREAD AN OCTAL NUMBER 
LOW ORDER BITS ARE ON TOP OF THE STACK 
;sHIGH ORDER BITS ARE IN $HIOCT 


: PROVIDE SPACE FOR THE 
NUMBER 


; INPUT 
7 PUSH RO ON STACK 
eae R1 ON STACK 
PUSH R2 ON STACK 
:;READ AN ASCIZ LINE 
SIGET ADDRESS OF 1ST CHARACTER 
7zCLEAR DATA WORD 


3zPICKUP THIS CHARACTER 
331F ZERO GET OUT 


sSTRIP THE ASCII JUNK 
ry ge THIS DIGIT 


‘= CLEAN TERMINATOR FROM STACK 
tO SAVE THE RESULT 


33:POP STACK INTO R2 
3zPOP STACK INTO R1 
3:POP STACK INTO RO 


; sRETURN 
7zHIGH ORDER BITS GO HERE 
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CZNCCA.P11 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEQ 0104 


.-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


FERRARA ERE AEE AREER AREER AER AEE EEARAEAEEAEREERERERRERE RARER 
<STHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
;*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
‘NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TY?ED 
BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING 2£°NS WILL ALWAYS Gf 
; sREPLACED WITH SPACES. 

. NUM, =(SP) :PUT THE BINARY NUMBER OM THE STACK 
is <°60 TO THE ROUTINE 


$TYPDS: 
MO RO,-(SP) ;zPUSH RO ON STACK 


Fe 
#20200, -(SP) SET BLANK SWITCH AND SIGN 
20(SP) .R5 GET THE INPUT NUMBER 

1$ ;7BR IF_INPUT IS POS. 


R5 
#*=,1(SP) 
RO 


#SDBLK ,R3 

#* ,(R3)+ ‘:SET THE FIRST CHARACTER TO A BLANK 
R2 *:CLEAR THE BCD NUMBER 

$DTBL(RO),R1 *:GET THE CONSTANT 

R1,R5 ::FORM THIS BCD DIGIT 


;;BR IF DONE 
37 INCREASE THE BCD DIGIT BY 1 


7zADD BACK THE CONSTANT 
3;CHECK IF BCD DIGIT=0 
3;FALL THROUGH IF 0 
ett a LEADING 0°S? 


6$ 327BR IF NO 
177777 MOVB . :YES--SET THE SIGN 
6 #°0,R2 7zMAKE THE BCD DIGIT ASCII 

oy IT A SPACE IF NOT ALREADY A DIGIT 
sPUT THIS CHARACTER IN THE OUTPUT BUFFER 
+: JUST INCREMENT ING 
::CHECK THE TABLE INDEX 
;;GO DO THE NEXT DIGIT 


TO ASCII 
; y Fee THE FIRST NON-ZERO? 


9$ +? 
177777 + 177776 -1(SP),-2(R3)  3:YES=-SET THt SIGN FOR TYPING 

9$: (R3) 33SET THE TERMINATOR 

012605 (SP)+,R5 3;POP STACK INTO RS 





C2 
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012603 (SP)+,R3 3zPOP STACK INTO R3 
(SP)+,R2 < Bop STACK INTO R2 
(SP)+,R1 3POP STACK INTO R1 
(SP)+,RO 7:POP STACK INTO RO 
034076 .SDBLK ‘INOW TYPE THE NUMBER 
000002 000004 7 2(SP) ,4(SP) ;sADJUST THE STACK 


(SP) +, (SP) 
; RETURN TO USER 
$DTBL: 


$DBLK: .BLK 
- SBTTL SCOPE HANDLER ROUT INE 


FRIIS IIA AIA IIA ISI SSSISISISSISISSSSSISSSSSSSISSSSASA 
TR THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
7*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
:*AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<15:08> 

[*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

;*SW14=1 LOOP ON TEST 

3*SW11=1 INHIBIT ITERATIONS 

7 *SWO9=1 LOOP ON ERROR 

3 *SWO8=1 LOOP ON TEST IN SWR<7:0> 

7 *CALL 

s* 3; SCOPE=I10T 


$SCOPE : 
104407 CKS 3zTEST FOR CHANGE IN SOF T~SWR 
046042 PC,CTRLCG ;TEST FOR CTRL C ORG 
040000 145016 1$: #B1T14,aSWR + LOOP ON PRESENT TEST? 
001114 BNE SOVER YES IF SW14=1 
j;AMAHASTART OF CODE FOR THE XOR TESTERAMAAA 
000416 $XTSTR: BR 6$ iilF RUNNING ON THE ‘‘XOR’’ TESTER CHANGE 
THIS INSTRUCTION TO A _‘NOP** (NOP=240) 
013746 000004 @4ERRVEC ,-(SP) :? SAVE THE CONTENTS OF THE ERROR VECTOR 
000004 #5$ ,aAERRVEC ;SET FOR TIMEOUT 
a4177060 TIME OUT ON XOR? 
(SP) + ,a#ERRVEC :GRESTORE THE ERROR VECTOR 
$SVLAD ;GO TO THF NEXT TEST 
5$: (SP)+, (SP)+ ;;CLEAR THE STACK AFTER A TIME OUT 
000004 (SP) +, @#ERRVEC ; ;RESTORE THE ERROR VECTOR 
7 OOP ON THE PRESENT TEST 
CODE FOR THE xOR’ TESTERAAHAM 
000400 144750 BIT #B1T08,aSWR : LOOP ON SPEC. TEST? 


2$ ‘BR IF NO 
144742 001102 AUR, STSTNM 72 0N THE RIGHT TEST?  SWR<7:0> 
001103 : SERFLG i SHAS AN, ERROR OCCURRED? 
001115 001103 ! SERMAX, SERFLG MAX. ERRORS FOR THIS TEST OCCURRED? 


3 IF NO 
001000 144712 #B1T09,aSWR ::LOOP ON ERROR? 
001404 4$ 3;:BR IF NO 
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SCOPE HANDLER ROUTINE 
013737 
000446 


000002 
003720 


105737 
10000 


001110 


001103 
001160 


004000 


001106 


001157 


000002 
000001 


000100 


034442 
035444 


001106 


144660 


001104 


001104 
001160 


001200 


001115 
144560 


001214 
001215 


7$: Pm 3;SET LOOP ADDRESS TO LAST SCOPE 


4$: ::ZERO THE ERROR FLAG 
$ 3;CLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR 1$ 3sESCAPE TO THE NEXT TEST 
3$: ~ ‘aida coma pe ITERATIONS? 


:2BR IF YES 
$SPASS salF FIRST PASS OF PROGRAM 
1$ INHIBIT ITERATIONS 
SICNT ZZINCREMENT ITERATION COUNT 
STIMES,SICNT 3;CHECK THE NUMBER OF ITERATIONS MADE 
SOVER ;;BR_ IF MORE ITERATION REQUIRED 
1$: #1,$1CNT ; REINITIALIZE THE ITERATION COUNTER 
MO SMXCNT ,STIMES SET NUMBER OF ITERATIONS TO DO 
$SVLAD: STSTNM ; COUNT TEST NUMBERS 
MO $TSTNM,STESTN SET TEST NUMBER IN APT MAILBOX 
(SP) , SLPADR ::SAVE SCOPE LOOP ADDRESS 
(SP) ,$LPERR ;;SAVE ERROR LOOP ADDRESS 
$ESCAPE 73 CLEAR THE ESCAPE FROM ERROR ADDRESS 
MO #1, SERMAX ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
SOVER: $TSTNM,aD1ISPLAY ; DISPLAY TEST NUMBER 
MO SLPADR, (SP) sFUDGE RETURN ADDRESS 
RTI TIF IXES PS 
SMXCNT: 2000. ;sMAX. NUMBER OF ITERATIONS 
-SBTTL TYPE ROUTINE 


FIO ICICI IOI IORI IOI IOI IORI IOI IOI IOI IAI SISA IAIS IIASA ISSSSSISSISSASSIS SIA ' 
7 *ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
3 *THE - right WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED 


$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 


; : $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
; #NOTES: $FILLC CONTAINS THE CHARACTER TO FILL AFTER. 


ats 
:*1) USING A TRAP INSTRUCTION 
TYPE ,MESADR ::MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


TYPE 
ME SADR 


ahaa 2i1S ee By TERMINAL ? 
;ZHALT HERE IF NO TERMINAL 

3$ 7 LEAVE 

RO,~(SP) 77 SAVE RO 

a2(SP),RO aH ADDRESS OF ASCIZ STRING 
#APTENV, SENV UNNING IN APT MODE 

6 7. GO CHECK ro ns! {Sosa 
#APTSPOOL , SENVM 3 SPOOL MESSAGE T 

62$ NO,GO CHECK FOR CONSOL E 
RO,61$ +: SETUP MESSAGE ADDRESS FOR APT 
PC, SATY3 :; SPOOL MESSAGE TO APT 

0 MESSAGE ADDRESS 


SEQ 0106 
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132737 000040 001215 62$: #APTCSUP , SENVM +t CONSOLE SUPPRESSED 
001003 BN ;YES,SKIP TYPE OUT 
2$: (RO)+,=(SP) 7ZPUSH CHARACTER TO BE TYPED ONTO STACK 
BN 4$ 73BR IF IT ISN'T THE TERMINATOR 
(SP) + 731F TERMINATOR POP IT OFF THE STACK 
(SP) +,RO ;;RESTORE RO 
38: #2,(SP) fg RETURN PC 


RE 
4$: #HT, (SP) +: BRANCH IF <HT> 
pach testy ; BRANCH IF NOT <CRLF> 


(SP) + :zPOP <CR><LF> EQUIV 
7: TYPE A CR AND LF 


034650 SCHARCNT 73CLEAR CHARACTER COUNT 
BR 2$ 33GET NEXT CHARACTER 
034604 : PC, $TYPEC 3:GO TYPE THIS CHARACTER 
001156 : $FILLC,(SP)+ ie1S IT TIME FOR FILLER CHARS.? 
2$ 31f NO GO GET NEXT CHAR. 
013746 001154 SNULL ,- (SP) ::GET # OF FILLER CHARS. NEEDED 
3zAND THE NULL CHAR, 
105366 000001 s 1(SP) : DOES A NULL NEED TO BE TYPED? 
002770 6$ ;BR IF NO--GO POP THE NULL OFF OF STACK 
004737 034604 JSR PC,$TYPEC $:GO TYPE A NULL 
105337 034650 $SCHARCNT ;3DO0 NOT COUNT AS A COUNT 
000770 BR 7$ ; LOOP 


;HORIZONTAL TAB PROCESSOR 


112716 000040 8$: #" ,(SP) ;zREPLACE TAB WITH SPACE 
9$: PC,$TYPEC :zTYPE A SPACE 
034650 #7, S$CHARCNT ; ;BRANCH IF NOT AT 
9$ 33TAB STOP 
(SP)+ 7sPOP SPACE OFF STACK 
BR 2$ 33GET NEXT CHARACTER 
144340 STYPEC: os a$TPS 7:WAIT UNTIL PRINTER IS READY 


STYPEC 
000002 144332 2(SP) ,a$TPB :sLOAD CHAR TO BE TYPED INTO DATA REG. 
000015 000002 #CR,2(SP) 31S CHARACTER A CARRIAGE RETURN? 

1$ ::BRANCH IF NO 
034650 DSS aaa CHARACTER COUNT 


000012 000002 1$: #LF ,2(SP) Z:1S CHARACTER A LINE FEED? 
STYPEX 7 BRANCH IF YES 
INCB (PC)+ 7:COUNT THE CHARACTER 
$CHARCNT:.WORD 0 3=CHARACTER COUNT STORAGE 
$TYPEX: RTS PC 
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.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


SUISSE ISICISISISIIIOIIDIOIOIIOIOIIOISIIDIOI IOI ITO I TOT SOT TOT TT TTT TTT TTT TAIT 

:*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
:*OCTAL (ASCII) NUMBER AND TYPE IT 

hy aaa HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


NUM ,=(SP) > ;NUMBER TO BE TYPED 
3;CALL FOR TYPEOUT 
7 3N=1 oR 0 FOR NUMBER OF DIGITS TO TYPE 


: =TYPE LEADING ZEROS 
oi SUPPRESS LEADING ZEROS 


: #$TYPON-=--ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
; *$TYPOS OR $TYPOC 
CALL: 
al MOV NUM, = (SP) ; ;NUMBER TO BE TYPED 
;* TYPON 73CALL FOR TYPEOUT 


*% 
oe HERE FOR TYPEOUT OF A 16 BIT NUMBER 
é Li: 


MOV NUM, = (SP) ; NUMBER TO BE TYPED 
TYPOC 73CALL FOR TYPEOUT 


$TYPOS: a(SP) ,-(SP) 7zPICKUP THE MODE 
035077 M 1(SP) ,SOF ILL 3zLOAD ZERO FILL SWITCH 
(SP)+,$OMODE+1 ;;NUMBER OF DIGITS TO TYPE 
;zADJUST RETURN ADDRESS 


BR 
035077 $TYPOC: ’ 3sSET THE ZERO FILL SWITCH 
000006 035101 MO ° s3SE7 S1X(6) DIGITS 
000005 035076 $TYPON: ~ ° sé ‘ ITERATION COUNT 


: 5 
035101 at . SIGET THE NUMBER OF DIGITS TO TYPE 


000006 ;;SUBTRACT IT FOR MAX. ALLOWED 
035100 7;SAVE IT FOR USE 
035077 SOF ILL ,R4 3:GET THE ZERO FILL SWITCH 
000012 12(SP) ,R5 :zPICKUP_THE INPUT NUMBER 
R3 a AT THE OUTPUT WORD 
sROTATE MSB INTO *'C’’ 


DO MSB 
FORM THIS DIGIT 


: R 7 sGET LSB OF THIS Bl 
035100 $ : TYPE THIS DIGIT 
7$ . IF NO 
177770 #177770,R3 SI GET RID OF JUNK 
035010 001002 4$ 7 TEST FOR O 
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035012 33 LIBR IF YES. S 0? 


4$: DON" T SUPPRESS ANYMORE 0'S 
szMAKE THIS DIGIT ASCII 
76: . J ;zMAKE ASCII IF NOT ALREADY 
7 SAVE FOR TYPING 
8$ ::GO TYPE THIS DIGIT 
035076 7$: 3; COUNT BY 1 
2$ ;;BR IF MORE TO DO 
IF DONE 


:: INSURE LAST DIGIT ISN*T A BLANK 
60 DO THE LAST DIGIT 


’ . TORE R R3 
000002 000004 ° 33 SET THE STACK FOR RETURNING 


7 RETURN 
8$: d ;ZzSTORAGE FOR ASCII DIGIT 

: 7; TERMINATOR FOR TYPE ROUTINE 
SOCNT: ;;O0CTAL DIGIT COUNTER 
SOFILL: .BYTE zzZERO FILL SWITCH 
SOMODE: .WORD : NUMBER OF DIGITS TO TYPE 


-SBTTL ERROR HANDLER ROUTINE 


LRA RRR E RRR REE REE EEE ER ee 
3*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
7*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
:*AND GO TO SERRTYP ON ERROR 
; * THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
15=1 HALT ON ERROR 

INHIBIT ERROR TYPEOUTS 

PELL ON ERROR 

LOOP ON ERROR 


N 7 ;ERROR=EMT AND N=ERROR ITEM NUMBER 


035102 
32 TEST FOR CHANGE IN SOFT=SWR 
001103 : SERFLG 2eSET THE ERROR FLAG 
7$ ;DON*T LET THE FLAG GO TO ZERO 
001102 144022 STSTNM,@DISPLAY ::DISPLAY TEST NUMBER AND ERROR FLAG 
002000 #B1T10,aSWR ;;BELL ON ERROR? 
1$ 3:NO - SKIP 
001164 , $BELL 2 RING BELL 
001112 : SERTTL ;COUNT THE NUMBER OF ERRORS 
001116 (SP) , SERRPC Z:GET ADDRESS OF ERROR INSTRUCT ION 
000002 #2, SERRPC 
143740 @SERRPC SI TEMB 5 tg AND SAVE THE ERROR ITEM CODE 
020000 #B1T13,aSWR SKIP TYPEOUT IF SET 
208 [SKIP TYPEOUTS 
035302 PC, SERRTYP £260 TO USER ERROR ROUTINE 
035174 001171 - SCRLF 
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122737 
001007 


113737 
004757 
000 


013716 
022737 
001001 
000000 


000002 


012037 


000001 
001114 
035454 


143706 


001000 


001110 
001162 


001162 
030164 


001171 
001114 


001116 


001256 
035354 


001171 
035372 
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001214 
035222 


143672 


000042 


20$: 


3$: 


4$: 


5$: 


6$: 


8-AUG-78 


~ eapecevcesee: 
$1TEMB,21$ 
oe 


0 

22$ 

a@SwR 

3$ 
#B1T09,aSWR 
4$ 

SLPERR, (SP) 
SESCAPE 

5$ 
SESCAPE , (SP) 
#SENDAD , 442 
6$ 
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3; RUNNING IN APT MODE 

;zNO,SKIP APT ERROR REPORT 

3; ;SET ITEM NUMBER AS ERROR NUMBER 
; REPORT FATAL ERROR [0 APT 


;zAPT ERROR LOOP 

7 HALT ON ERROR 

7zSKIP IF CONTINUE 

;zHALT ON ERROR! 

ety 3 FOR CHANGE IN SOF T=-SwR 
Se a A ERROR SWITCH SET? 


‘FUDGE RETURN FOR LOOPING 
«I CHECK FOR AN ESCAPE ADDRESS 
33 IF NONE 
: FUDGE RETURN ADDRESS FOR ESCAPE 
7zACT=-11 AUTO-ACCEPT? 
7 BRANCH IF NO 


37 YES 
; SRETURN 


-SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


REE REE EEEREKEREEKEREREEKEEEREREEKEKEEKEEEEEEEREKEREEEE 


“RTHIS ROUTINE USES THE ‘‘ITEM CONTROL BYTE’ ($ITEMB) TO DETERMINE WHICH 


;*ERROR IS TO BE REPORTED. 


IT THEN OBTAINS, FROM THE ‘ERROR TABLE’ (SERRTB), 


:*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


SERRTYP: 
TYPE 


-SCRLF 
— 


R 
a4#$ 1 TEMB,RO 
1$ 


SERRPC ,~-(SP) 


RO 
#$ERRTB,RO 
(RO) +, 2% 
3$ 


-$CRLF 
(RO) +,4$ 


72° 'CARRIAGE RETURN'’ & ‘LINE FEED" 
77 SAVE RO 


3¢PICKUP THE ITEM INDEX 


iilf ITEM NUMBER IS ZERO, JUST 
;TYPE THE PC OF THE ER ROR 

2: SAVE SERRPC FOR TYPEOUT 
ERROR ADDRESS 
:G0 en ASCII(ALL DIGITS) 


s2GeT 
$ TADJUST THE INDEX SO THAT IT WILL 
ie WORK FOR THE ERROR TABLE 


; FORM TABLE POINTER 

;ZPICKUP ‘ERROR MESSAGE’ POINTER 

72 SKIP TYPEOUT IF NO POINTER 

72 TYPE THE ‘ERROR MESSAGE’ 

77" ERROR MESSAGE’ POINTER anes HERE 
32° CARRIAGE RETURN'’ & ‘LINE FEED" 

: PICKUP ‘DATA HEADER’ POINTER 


SEQ 0110 
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5$ :;SKIP TYPEOUT IF O 
37 TYPE THE ‘DATA HEADER"’ 
4$: ’ 0 37° DATA HEADER’’ POINTER GOES HERE 
001171 -SCRLF zi CARRIAGE RETURN’' & ‘LINE FEED’ 
5$: (RO) ,RO te "DATA TABLE*’ POINTER 
7$ ;GO TYPE THE DATA 
6$: MOV (SP)+,RO > =:RESTORE RO 
001171 gn 2 CARRIAGE RETURN'’ & ‘LINE FEED" 


7$: sire 


@(RO)+,=(SP) 32SAVE a(RO)+ FOR TYPEOUT 
3:GO TYPE=-OCTAL ASCII(ALL DIGITS) 
22S THERE ANOTHER NUMBER? 
$ :BR_ IF NO 
035432 5 ii TYPE TWO(2) SPACES 


7 BR :-L00 
035432 020040 000 : . 33TWO(2) SPACES 


035436 
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-SBTTL APT COMMUNICATIONS ROUTINE 


J LEAR AREER REAR ERE EREEERREE ARERR RERAERRRERERERER REREAD 


112737 000001 
112737 000001 
000403 

112737 000001 


035700 
000001 
000100 
000004 
000002 
001174 
001210 


001210 
001212 
000004 
000004 
000002 
177776 
034372 


035702 
001214 


035700 


000200 


035702 
035700 


035702 


001214 
001215 


000004 


001174 


035612 
000004 


001176 
000004 


$ATY1: 
$ATY3: 


$ATY4: 
$ATYC: 


SMFLG: 
$LFLG: 
$FFLG: 


-EVEN 
APTSIZE=200 
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#1,SFFLG 
RO,-(SP) 
R1,~(SP) 
SMFLG 


5$ 
#APTENV, SENV 


ee 
a4 (SP) ,RO 
#2,4(SP) 
$MSGTYPE 


1$ 
RO, $MSGAD 
(RO) + 


2s 
$MSGAD ,RO 
RO 


RO, $MSGLGT 
#4, SMSGTYPE 


a4(SP) ,4$ 
#2,4(SP) 
177776,-(SP) 
ss 


SFFLG 
12$ 
SENV 

12$ 
$MSGTYPE 


11$ 
04(SP) , SFATAL 
-4(SP) 


(SP) +_RO 
PC 
0 


0 
0 


SEQ 0112 


3;TO REPORT FATAL ERROR 
33TO TYPE A MESSAGE 


33TO ONLY REPORT FATAL ERROR 


3zPUSH RO ON STACK 
:7PUSH R1 ON STACK 
¢¢ SHOULD - TYPE A MESSAGE? 


:IF NOT: BR 
; OPERATING UNDER APT? 
NOT: BR 
: s SHOULD SPOOL MESSAGES? 
NOT: BR 


T:GET MESSAGE ADDR. 
; ;BUMP RETURN ADDR 
22 SEE IF DONE W/ LAST XMISSION? 
;IF NOT: WAIT 
7:PUT ADDR IN MAILBOX 
73FIND END OF MESSAGE 


3:SUB START OF MESSAGE 

33GET MESSAGE LNGTH IN WORDS 
3zPUT LENGTH IN MAILBOX 
73TELL APT TO TAKE MSG. 


z:PUT MSG ADDR IN JSR LINKAGE 
BUMP RETURN ADDRESS 

PUSH 197776 ON STACK 

*:CALL TYPE MACRO 


: s SHOULD REPORT FATAL ERROR? 
; NOT: BR 
; ;RUNNING UNDER APT? 
; NOT: BR 
3 3F INISHED LAST MESSAGE? 

:IF NOT: WAIT 
GET ERROR a 

RETURN ADDR. 


; sBUMP 
ri TELL APT TO TAKE ERROR 
eCLEAR FATAL FLAG 


2 ¢POP STACK INTO RO 
TURN 


3 cRE 

7 zMESSG. FLAG 

:LOG FLAG 
 DEATAL FLAG 





an 
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000001 APTENV=001 
000100 

000040 0 

.SBTTL POWER DOWN AND UP ROUTINES 


FDS OI IOS IOI SIDI III TOIT IOI TTT TT TTT TOTTI TASS ISAS SS ASE 
;POWER DOWN ROUTINE 
012737 036044 000024 S$PWRDN: MOV #SILLUP ,aAPWRVEC 2eSET FOR FAST UP 
000340 000026 MOV #340, aAPURVEC 2 ; “44 on 6teee 


R1 ON STACK 


143200 P ;;PUSH @SWR ON STACK 
036050 3sSAVE SP 
035756 000024 M$SPWRUP ,AAPWRVEC ;;SET UP VECTOR 


72 7 ZHANG UP 


3 < KKK KKK KEKE KEKKKKKKKKKKEKKKKKKEKKKKKKKKKEEEEKEKEKEK 
;POWER UP ROUTINE 
036044 000024 : MSILLUP,@#PWRVEC ;;SET FOR FAST DOWN 
R6,SP ::GET SP 
:zWAIT LOOP FOR THE TTY 
036050 1$: zzWAIT FOR THE INC 
1$ se WORD 


143132 


;;POP_ STACK INTO RO 
035704 000024 #SPWRDN,@APWRVEC :;SET UP THE POWER DOWN VECTOR 
000340 000026 #340, a#PWRVEC+2 ;:PRIO:7 
:REPORT THE POWER FAILURE 
$SPWRMG: .WORD $POWER 7;POWER FAIL MESSAGE POINTER 


SILLUP: 3:2 THE POWER UP SEQUENCE WAS STARTED 
72 :: BEFORE THE POWER DOWN WAS COMPLETE 
$SAVR6: 0 73PUT THE SP HERE 
047520 042527 $POWER: .ASCIZ <15><12>' ‘POWER’ 


- EVEN 
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101371 


000004 
000006 


000006 
003776 


036276 
177572 
100000 
036404 
000340 
172340 
000010 
077406 
000200 
177600 


036234 

000020 

177572 
36 


172356 
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000004 


036120 
000250 
000252 


177740 


000004 
172516 


000004 


SEQ 0114 
-SBTTL ROUTINE TO SIZE MEMORY 


SF II IIT I IT IIIT TT RT ITT TIKIT IIIT IR TOR IIR TIT 


3*CALL: 
:* JSR PC,$SIZE 
RETURN 
} SSLSTAD wine CONTAIN: 
c KT11_ OPTION =~ LAST VIRTUAL ADDRESS OF THE LAST BANK 
3* WITHOUT KT11 OPTION -- LAST ABSOLUTE ADDRESS OF AVAILABLE MEMORY 


[*$LSTBK WILL CONTAIN THE LAST BANK AS A SAF 


: 881197 = aa fo T USE MEMORY MANAGEMENT 
T BE SETUP BEFORE THE CALL 
:=B1T15 = a DON'T HAVE MEMORY MANAGEMENT OP” ION 
: DETERMINED BY ROUTINE 


$SIZE: MOV RO,-(SP) 33SAVE RO ON THE STACK 


MOV R1,-(SP) 3:SAVE R1 ON THE STACK 
MOV R2.-(SP) SAVE R2 ON THE STACK 
MOV R3,-(SP) SAVE R3 ON THE STACK 


MOV @AERRVEC,-(SP) ::SAVE PRESENT ERROR VECTOR PS & PC 


MOV AWERRVEC+2,~(SP) 
MOV SP,RO wy THE STACK POINTER 
33StT a a PS TO THE PRESENT P 
PUSH OLD PSW AND PC ON STACK 


mov (SP) +, a@MERRVEC+2. 3zSAVE THE PSW IN @#ERRVEC+2 
MOV #3776.R1 ;zSETUP ADDRESS 
TSTB (PC)+ ;sUSE MEMORY MANAGEMENT? 


$KT11: . WORD + 2eSET TO USE MEMORY MANAGEMENT 
BP F NO 


$COR I 
MOV PSKINEX, @MERRVEC GaSET FOR TIMEOUT 
TST @a4SRO KT11 ARE YOU THERE? 
BIS #100000 ,$KT11 1 YES--SET KT11 KEY 
MOV #KTERR,@AMMVEC ::SET IN CASE OF ERROR 


CLR ~(SP) :zINITIALIZE FOR "PAR'* LOADING 

MOV #KIPARO,R2 ADDRESS OF FIRST *PAR™ 

MOV #°D8,R3 ; LOAD EIGHT 'PAR.'S'’ AND EIGHT 'PDR.'S'’ 
1$: MOV #77406.-40(R2) ::PDR = 4K, UP, READ/WRITE 

MOV (SP), (R2)+ T:LOAD ‘PAR’ 

ADD #200, (SP) : {UPDATE FOR NEXT ‘PAR 

SOB R3,1$ SLOOP UNTIL ALL Elem me LOADED 

MOV #177600,-(R2) ::SETUP KIPAR7 FOR 1/0 

CLR -(R2) “SETUP KIPAR6 FOR TESTING 

MOV #2$, AAERRVEC <°CATCH TIMEOUT IF NO SR3 

MOV #20, a4SR3 ::ENABLE 22 BIT MODE 

BR 3$ *:THIS PDP-11 HAS A SR3 REGISTER 
2$: CMP (SP)+, (SP)+ ZECLEAN OFF THE STACK~-NO SR 3 
3$: INC ayvSR ON MEMORY Y MANAGEMENT 

MOV #SKTOUT @WERRVEC ::SET FOR TIME OU 
4$: TST 04143776 :: TRAP ON NONCEX PEM 

ADD #40, (R2) “MAKE A 1K STEP 


CMP @AKIPAR7,(R2) :LAST ONE? 
BHI 4$ 3zNO--TRY IT 


an 
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011202 
005037 
0004 


00000 
000776 


177572 


100000 036120 
036334 000004 


004000 
000040 


177776 


004000 
000040 


000006 
000004 
036400 
036402 


MACY11 27(654) 


$KTOUT: 


$SKTNEX: 


SCORE: 
1$: 


$CROUT: 
$SIZEX: 


$LSTAD: . 
$LSTBK: . 


KTERR: 


8-AUG-78 


Ll 9 
15:05 PAGE 103 
(R2) ,R2 37GET LAST BANK+1 
a4SRO sz; TURN OFF MEMORY MANAGEMENT 


$SIZEX 
#100000,$KT11 =; ;KT11 NON-EXISTENT 
#SCROUT ,@MERRVEC ;;SET FOR TIMEOUT 


R2 37;SET UP BANK 
#4000,R1 :; INCREMENT BY 1K 
#40,R2 s31K STEP 

(R1) 37 TRAP ON TiME OUT 
#177776,R1 :7LAST ONE 

1$ zZNO--TRY AGAIN 
#4000,R1 

#40,R2 ::DROP BACK 


RO, SP ;gRESTORE THE STACK 
(SP)+,@MERRVEC+2 ;;RESTORE ERROR VECTOR 
(SP) + ,@#ERRVEC 


R1,$LSTAD ;zLAST ADDRESS 

R2,$LSTBK 7 LAST BANK 

(SP)+,R3 7sRESTORE R3 

(SP)+,R2 isRESTORE R2 

(SP)+,R1 ;sRESTORE R1 

aia ;¢RESTORE RO 

0 ::CONTAINS THE LAST ADDRESS 
0 3zCONTAINS THE LAST BANK 


3KT11 FAILURE 


SEQ 0115 
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.-SBTTL SAVE AND RESTORE RO-R5 ROUTINES 


RESIS IIIUISISI SISSIES IIOISIIIOISIOIOIOIOIOIDIIOIOIOISI IIIT III IIE 
{RSAVE RO-R5 
*CALL: 


-* 


SAVREG 
5 SUPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE: 


TOP==~(+16) 
p* +2--=(+18) 
p* +4-==R5 
st #6-—=R4 
3* +8---R3 
3*+10---R2 
7*+12---R1 
7*+14---R0 


SSAVREG: 
MOV RO,-(SP) 38 RO ON STACK 
33 R1 ON STACK 
R2 ON STACK 


ON STACK 
53 ON STACK 
22(SP) ,=(SP) 33 OF MAIN FLOW 
22(SP) ,-(SP) $3 
22(SP) ,=(SP) 
22(SP) ,~(SP) ;3SA OF CALL 


tase” RO-R5 
aca LL: 


SRESREG: 
MO (SP) +,22(SP) sRESTORE PC OF CALL 
(SP)+,22(SP) sRESTORE PS OF CALL 
(SP)+,22(SP) TIRESTORE PC OF MAIN FLOW 
(SP)+,22(SP) 2 ¢RESTORE PS OF MAIN FLOW 
(SP)+,R5 ; NTO R5 
(SP)+,R4 33 INTO R4 
(SP)+,R3 33 INTO R3 
(SP)+,R2 ; ;POP INTO R2 
(SP)+,R1 $8 INTO R1 
(SP)+,RO 3zPOP STACK INTO RO 
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CZNCCA.P11 


MACY11 27(654) 
INTEGER MULTIPLY ROUTINE 


- SBTTL 


8-AUG-78 


INTEGER MULTIPLY ROUTINE 
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SEQ 0117 


FLEA E EERE RAE RARER RAE RE ERE RRR ERR RREREERERRE 


7*CALL 


Ba Be Be Be Be Be Be Be He 
a eeeeae eee 


¢ 


MUL TIPLER,~(SP) 


MUL TIPLICAND,=(SP) 
PC ,@#$MULT 
3sPRODUCT IS ON THE STACK 


PRODUCT 


RO,~(SP) 
R1,~(SP) 
R2,-(SP) 
-(SP) 
12(SP) ,R1 
1$ 

(SP) 

R1 

14(SP) ,R2 
2$ 

(SP) 


R2 
#17.,-(SP) 
RO 


4$ 
R2,RO 
RO 

R1 
(SP) 


3$ 
(SP) +, (SP) 
5$ 


S 
RO,12(SP) 
R1,10(SP) 
(SP)+,R2 
(SP)+,R1 
(SP) +,RO 
PC 


;3PUSH RO ON STACK 


Pig | Ay seteateacstn: 


SISer THE SIGN KEY 
73MAKE THE MULTIPLICAND POSTIVE 
23GET THE MULTIPLIER 
:3R IF PLU 
; {UPDATE THE SIGN KEY 
E THE MULTIPLIER POSTIVE 
7:SET THE LOOP COUNT 
3< SETUP FOR THE MULTIPLY LOOP 
7:DON'T ADD IF MULTIPLICAND = 0 


3zPOSITION THE PARITIAL PRODUCT AND 
33 THE MULTIPLICAND 
; sHAS “a adie OF THE MULTIPLICAND BEEN DONE? 


oe I 

¢;SHOULD PRODUCT BE NEGATIVE? 
3:GO TO EXIT IF NO 

7zYES--SO MAKE IT SO 


4h ae SIGN INFO. OFF OF STACK 
— PRODUCT ON THE STACK (MSB*S) 


*TpOP STACK INTO R2 
;zPOP STACK INTO R1 
:;POP STACK INTO RO 





B 10 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG-78 15:05 PAGE 106 : 
CZNCCA.P11 INTEGER DIVIDE ROUTINE SEQ 0118 


-SBTTL INTEGER DIVIDE ROUTINE 


FI IT I I IIIT IIIT IT ITT III I III IIIT IIIT EIT IE 
SR THIS ROUTINE WILL DIVIDE A 32-BIT TWO"S COMPLEMENT INTEGER 
:*DIVIDEND BY A 16-BIT TWO'S COMPLEMENT INTEGER DIVISOR GIVING 
3*A 16-BIT TWO'S COMPLEMENT INTEGER QUOTIENT AND A 16-BIT REMAINDER. 
:*DIVISION WILL BE PERFORMED SO THAT THE REMAINDER IS OF THE 
ae SIGN AS THE DIVIDEND. 


*CALL: 
LOW DIVIDEND,-(SP) ;;THE HIGH DIVIDEND MUST BE < 1/2 
HIGH DIVIDEND,~(SP); AS LARGE AS THE DIVISOR 
DIVISOR,=(SP) 
PC,$DIV 
7;QUOTIENT & REMAINDER ARE ON THE STACK 
IMPLIES NO ERROR 


IMPLIES ERROR OCCURRED 
"C''=0 DIVIDE OVERFLOW OCCURRED 
"C’''=1 ATTEMPTED TO DIVIDE BY ZERO 


eSe he . 
Seeeeetneneeees. 


NO ERROR OVERFLOW DIVIDE BY ZERO 


REMAINDER ALL ZEROS ALL ONES 
QUOTIENT ALL ZEROS ALL ONES 


104400 7zPUSH OLD PSW AND PC ON STACK 

000017 #17, (SP) 3zSTRIP AWAY CONDITION CODES 

3=PUSH RO ON STACK 

73PUSH R1 ON STACK 

33PUSH R2 ON STACK 

3;PUSH R3 ON STACK 

) 3:SAVE A PLACE FOR SIGNS 
000021 °. 73SETUP THE ITERATION COUNTER 
000024 24(SP) ,R1 7=PICKUP THE DIVIDEND 
000022 22(SP) ,RO 
1$ 33CHECK THE SIGN 


000003 3(SP) 73KEEP TRACK OF THE SIGN 
E RO 3;3AND NEGATE THE ORIGINAL 
R1 ; NUMBER 


RO 
000020 : 20(SP) ,R2 : ¢PICKUP THE DIVISOR 
2$ ; CHECK THE SIGN 
i :DIVISOR oF, o.. IS A NO-NO 


3$ 
000003 000014 #3,14(SP) 52S 
177777 ees :: SET REMAINDER TO ALL ONES 


EX] 
000002 2 Pi T:KEEP TRACK OF DIVISORS SIGN 
R2 ZTCLEAR ite ORIGINAL NUMBER 


6$ 7START FORMING QUOTIENT 
R :ZPOSITION SB'S 


010003 





CZNCCA NCV11 


CZNCCA.P11 


037034 


DIAGNOSTIC MACY11 27(654) 
INTEGER DIVIDE ROUTINE 


000002 000014 


000020 
000016 


8-AUG-78 


R2.R3 

6$ 

R3,RO 

R1 

(SP) 

5$ 

R1 

8$ 
#2,14(SP) 
RO 


R 
R1,20(SP) 
RO, 16(SP) 
(SP)+,R3 
(SP)+,R2 
(SP)+,R1 
(SP) +,RO 
(SP) +,2(SP) 
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;;COMPARE DIVIDEND & DIVISOR 
3;BR IF DIVIDEND > DIVISOR 
[REMAINDER AFTER THIS LOOP 
— BIT ENTERS HERE 


::BR IF NO 
: SOVERF LOW? 


F NO 
T:SET ‘V'' IN RETURN STATUS WORD 
3;SET REMAINDER TO ALL ZEROS 
;;COPY REMAINDER INTO 2 aaa 
7;CLEAR COUNTER FROM STA 
a ae SIGN CORRECTION NEEDED? 


;BR IF 
+ NEGATE MREMAINDER 
7 sCLEAR SIGN 

; BUT DON'T FORGET QUOTIENT 

ie gt ald SIGN CORRECTION NEEDED? 


+ NEGATE QUOTIENT 
7 RETURN QUOTIENT AND 
; REMAINDER TO USER 
;zPOP STACK INTO R3 
:¢POP STACK INTO R2 
;zPOP STACK INTO R1 
sPOP STACK INTO RO 
:3SETUP TO RETURN CONDITION CODES 
N 


SEQ 0119 
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CZNCCA.P11 DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE 


-SBTTL DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE 


FRR E EERE REAR ERE EERE REE REE EREEE ERE EE ERE 


TRTHIS ROUTINE WILL CONVERT A 32-BIT BINARY NUMBER TO AN UNSIGNED 
stpost i (ASCII) NUMBER. THE SIGN OF THE BINARY NUMBER MUST BE 


TIVE. 
MOV #PNTR ,=(SP) 


JSR PC ,a#$DB2D 
RE TURN 


037036 : SAVREG 
037040 MOV 


037134 
037150 #STNPUR*?, oR5 
(R4) ,R1 
R2 
(R5) ,R2 
3$ 
R3 


2$ 
(R4)+,R1 
2 


R 
(R4)+,R2 
(R5) +, (R5)+ 


R3, (RO) + 
(PC)+ 
0 


1$ 
(RO) + 


PC 


000000 
037176 001750 


3zPOINTER TO LOW WORD OF BINARY NUMBER 
3zTHE FIRST ADDRESS OF ASCIZ 
3731S ON THE STACK 


ck REGISTERS 
PICKUP THE DATA POINTER 
[GET ADDRESS OF ‘‘$DECVL'' STRING 
SIPUT ADDRESS OF ASCIZ STRING ON STACK 
73PICKUP THE BINARY NUMBER 


SET UP TO DO 10 CONVERSIONS 
 TADDRESS OF TEN POWER 


7 CLEAR PARTIAL 
: SUBTRACT TEN POWER 
;7;BR IF TEN POWER TO LARGE 
;zADD 1 TO PARTIAL 
;3:LOOP 
: ;RESTORE SUBTRACTED VALUE 
;:MOVE TO NEXT TEN POWER 
3:7 CHANGE PARTIAL TO ASCII 
7: SAVE IT 
3; DONE? 
a IF NO 

; TERMINATOR 

: :RESTORE REGISTERS 

TURN 

+1. OE09 

>1.0E08 

:1.0E07 

>1.0E06 

;1.0E05 

:1.0E04 


;1.0E03 


SEQ 0120 
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0 331.0E02 
12 321.0E01 
0 


1 321.0E€00 


000000 0 
037216 SDECVL: .BLKB_ 12. RESERVE STORAGE FOR ASCIZ STRING 
-SBTTL SINGLE LENGTH BINARY TO DECIMAL ASCIZ ROUTINE 


MOR ARARRRASAAAAALALALLSASSLALA SSR SLES SSE RAR RASA RAR RR SARA RSA SASSO S| 


**THIS ROUTINE WILL CONVERT A 16-BIT UNSIGNED BINARY NUMBER TO AN 
>*UNSIGNED DECIMAL ASCIZ NUMBER. 


7 *CALL 
s* NUMBER , = (SP) :3PUT BINARY NUMBER ON THE STACK 

tos PC ,@#$SB2D 72CALL 

i TIADDRESS OF THE 1ST ASCIZ CHAR.IS ON THE STACK 


037232 000002 037262 $SB2D: 2(SP) ,1$ 7sSAVE BINARY NUMBER 
37262 MO 


0 #1$,-(SP) 72SET POINTER 

037036 PC, a#$DB2D 7zCALL DOUBLE LENGTH CONVERT 
000005 #5, (SP) ZZONLY ALLOW FIVE CHARACTERS 
000002 (SP)+, ,2(SP) 7zPICKUP POINTER 


7 ;RETURN 
037262 006000 : . 0.0 


SEQ 0121 





CZNCCA NCV11 
CZNCCA.P11 


037310 
037312 
037320 


037322 


037352 


DIAGNOSTIC 


TRAP DECODER 


037319 


000002 


037322 


000004 000002 
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SEQ 0122 
.SBTTL TRAP DECODER 


LRA RAR A RRR R RARE RARER ETRE RRR A REAR RAR A ETRE AREER ARERR ARATE 
7*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘‘TRAP’’ INSTRUCTION 
;*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
;*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
;*GO TO THAT ROUTINE. 


STRAP: RO,-(SP) 7 SAVE RO 
::GET TRAP ADDRESS 
; ;BACKUP BY 2 
77;GET RIGHT BYTE OF TRAP 
R :zPOSITION FOR INDEXING 
STRPAD(RO),RO ;; INDEX TO TABLE 
RO 3:GO TO ROUTINE 


3: THIS IS USE TO HANDLE THE ‘'GETPRI’’ MACRO 


$TRAP2: MOV (SP) ,=(SP) 7zMOVE THE PC DOWN 
MOV 4(SP) ,2(SP) 73MOVE THE PSW DOWN 
RTI ;zRESTORE THE PSwW 


-SBTTL TRAP TABLE 


z*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
;*BY THE ‘'TRAP’’ INSTRUCTION. 


D $TRAP2 
$TYPE ;;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
3 CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
33CALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
33 CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CAiL) 
3;CALL=TYPDS TRAP+5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 


2 CALL=GTSWR TRAP+6(104406) GET SOFT-SWR SETTING 


72 CALL=CKSWR TRAP+7(104407) TEST FOR CHANGE IN SOF T-SWR 
3; CALL=RDCHR TRAP+10(104410) TTY TYPEIN CHARACTER ROUTINE 
3:CALL=RDLIN TRAP+11(104411) TTY TYPEIN STRING ROUTINE 
DOCT ;;CALL=RDOCT TRAP+12(104412) READ AN OCTAL NUMBER FROM TTY 
$SAVREG ;;CALL=SAVREG TRAP+13(104413) SAVE RO-R5S ROUTINE 
SRESREG ;;CALL=RESREG  TRAP+14(104414) RESTORE RO-R5 ROUTINE 
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CZNCCA.P11 A TO D FIELD SITE AND ADJUSTMENT LOOP SEQ 0123 


.SBTTL A TO D FIELD SITE AND ADJUSTMENT LOOP 

037354 004737 046042 FSITE: | JSR PC, CTRLCG sTEST FOR CTRL C OR G 
032777 000100 141552 ~ #SW06,aSWR :TEST IF CAM 0 G=1 
001004 1 


040102 R5,CONVRT > CONVERT 
CAMERA 0 
STORE RESULTS 

000001 141532 : IT oe sTEST IF CAM 0 

040102 R5,CONVRT ; CONVERT 


3GAIN = 2 
037416 


037420 000200 141512 2$: #SW7,aSwR sTEST IF CAM 1 
001004 3$ 


040102 R5,CONVRT ; CONVERT 
CAMERA 1 
;STORE RESULTS 

000002 141472 : T pee TEST IF CAM 1 


040102 JSR CONVRT : CONVERT 
ar 0e1Ts" :CAMERA 1 GAIN 
CAM1G2 sRESULTS 


000400 141452 4$: #Su8..aSUR sTEST IF CAM 2 
040102 R5,CONVRT : CONVERT 


#2 
RESULTS 
000004 141432 : #SW2 ,ASWR TEST IF CAM 2 


6 
040102 JSR R5,CONVRT eee 
003000 BIT10!8179 2 
037516 ta AM2G2 RESULTS 


037520 001000 141412 6$: #SW9, aSWR sTEST IF CAM 3 
001004 7$ 


040102 JSR R5,CONVRT ; CONVERT 
BIT9!BIT8 CAMERA #3 
CAM3G1 RESULTS 

000010 141372 : + > eam TEST IF CAM 3 


040102 JSR R5,CONVRT = 
BIT10!BIT9!BIT8 [GAIN = 2 
C RESULTS 

; JOYSTICK 


000020 141352 10$: BIT ee gas TEST IF JOYSTICK 
L 

000001 142160 #B1TO,aSFR zASK_ FOR JOYSTICK 

142154 11$: @SFR WAIT FOR JOY DONE 


11$ 
017737 142152 040514 aJOY,JOYG1 SAVE THE RESULT 
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sNOW TEST IS TYPEOUT IS ENABLED 
037612 049060 CALRPT: +A R5,CKTSWR TEST BIT 6 
BR 1$ BR IF SET 
040516 CAMOTX ;REPORT CAMERA #0 
040412 J R5, CAMUNP REPORT VALUES 
040060 : R5,CKTSWR TEST BIT 0 


2$ 


040535 REPORT G=2 


CAMOTW 
040412 J RS, CAMUNP 


037654 
037656 040060 : R5,CKTSWR TEST BIT 7 
BR 3$ ;BR IF SET 
040554 CAM1TX REPORT CAMERA #1 
040412 JS R5, CAMUNP ;REPORT VALUES 
040060 : S R5,CKTSWR ;TEST BIT 1 
BR 4$ 
040573 CAM1TW REPORT CAM 1 G=2 
040412 JS RS, CAMUNP 
037720 
037722 040060 : R5,CKTSWR TEST BIT 8 
BR 5$ 7;BR IF SET 
040612 CAM2TX REPORT CAMERA #2 
040412 JS R5 , CAMUNP ;REPORT VALUES 
040060 : JS R5,CKTSWR TEST BIT 2 


BR 6$ 
040631 CAM2TW 
040412 JS R5 , CAMUNP REPORT CAMERA #2 G=2 


040060 : R5,CKTSWR TEST BIT 9 


NON 2 2 St SS es 
NSSoNRnRwv=of 


BR IF SET 
040650 CAM3TX REPORT CAMERA #3 
040412 JS R5 , CAMUNP ;REPORT VLAUES 


040060 : S R5,CKTSWR :TEST BIT 3 
10$ 


BR 
040667 CAM3TW REPORT CAMERA #3 G=2 
040412 JS RS, CAMUNP 
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040060 10$: Z R5,CKTSWR i; TEST BIT 4 
11$ 


B 
040706 JOYTW 
040412 R5 , CAMUNP REPORT JOYSTICK 


037354 : FSITE 

141054 : (R5)+,aSwR TEST IF INHIBIT THIS CAMERA 
BN 1$ BR IF YES 

020000 141044 + ident TEST INHIBIT TYPE-OUT 


BR IF YES 
(R5)+ :BUMP EXIT POINTER 
R5 ;EXIT 





~~ 


CZNCCA NCV11 


DUDA AVAAAAAAI IVI 


ek ed ed ed ed od 
KLKSRAVLSSELES 


STIC 


040406 
004000 
040406 
060000 
177770 
040410 
000004 


000001 
141544 


046042 


020000 
040407 
000060 
032714 
032621 
100000 


060000 
000004 


177400 
177400 


040404 


GNO MACY11 27(654) 
A TO D FIELD SITE AND ADJUSTMENT LOOP 


ete tae TO TAKE 8 CONVERSIONS AND AVERAGE FOUR OF THEM 
CONVR (R5)+,°.1$ ;SAVE C CHANN 


141602 


141550 


140712 


140662 


040404 


8-AUG-78 
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PCLRALL., @SFR 
11$,aCSR 
WBUFO. aBAR 
#-10,awCR 


INOUTZ,@SFR 


#4. ,R0 
R1 


#B1T0,aCSR 
acsR 
3$ 


R1 
1$ 
PC,CTRLCG 
RO 


1$ 
#SW13,aSWR 
5$ 
11$+1,RO 
#60 RO 

RO, OUT CHN 
OUTRN 


“+ ee Casur 


SEQ 0126 


;LOAD BUS ADDRESS 
;LOAD WORD COUNT 


:SET Z INPUTS IF ENABLED 
;LOAD COUNTER 
;FOR OUT OF RANGE VOLTAGE 


ENABLE THE DEVICE 
;WAIT FOR IDLE 


; DELAY 


:TEST FOR CTRL G OR C 
FINISHED OUT OF RANGE TIMER 


TEST IF INHIBIT TYPEOUT 
: F INHIBIT 


ASCII 
“INSERT INTO ASCII ERROR MESSAGE 
:TELL OPERATOR 


:TEST IF HALT ON NO CONVERSION ERROR 


6 ;BR IF CLEARED 
i= CONVERT FLAG - INPUT VOLTAGE WAS OUT OF RANGE OR NO ‘'2"' PULSES 


#177400,R2 
#177400,R1 


;LOAD POINTER 
;CLEAR RESULT 


;LOAD COUNTER 
GET LOW BYTE 
GET HIGH BYTE 


UPDATE RESULT 
UPDATE RESULT 


FINISHED ? 
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040404 MO R4,10$ SAVE IT 

040405 10$+1 ;CLEAR HIGH BYTE 
040405 R3,10$+1 ;LOAD HIGH BYTE 
040404 10$,a(R5)+ ;SAVE THE RESULT 


10$: 
11$: 0 
INOUTZ: TESTZ ;0= USE CUSTOMER Z PULSES, 1= MAINT Z PULSES 


; SUBROUTINE TO TYPE THE CAMERA MESSAGE 
AMUNP: MOV )+,10$ 


R5 :GET RESULT 


040472 


TYPE 3 DIGIT NUMBER 
zAND TRALING ASCII 


TYPE 3 DIGIT NUMBER 


sEXIT 


lelelelelelelelelelelo) 


012 -_ 15,12 
030115 020060 . /CAMOO G=1 X=/ 
020061 036530 


012 tw 15,12 
046501 030060 . /CAMOO G=2 X=/ 
031075 054040 


012 ; is 15,12 
030115 020061 . /CAMO1 G=1 X=/ 
020061 036530 





on Te 


CZNCCA NCV11 
CZNCCA.P11 


DIA 


052123 


GNOSTIC 
A TO D FIELD SITE AND ADJUSTMENT LOOP 


CAMITW: 


012 
046501 
031075 


012 
030115 
020061 


012 
046501 
031075 

012 
030115 
020061 

012 


046501 
031075 


024523 
044527 
040524 
006451 
052101 


MACY11 27(654) 


030460 
054040 


020062 
036530 


031060 
054040 


020063 
036530 


031460 
054040 


044524 
000075 


054524 
040507 
040 
040 


000040 
005015 


050111 
052123 
024523 
051105 
006452 
047440 
047522 


026505 


CAM2TX: 


CAM2TW: 


CAM3TX: 


CAM3TW: 


JOYTX: 
JOYTW: 


G1B: 
GAIN: 


GAINX: 
GAIN1: 
DASH: 


LSBMSG: 
SKPMSG: 


ERMSG: 


OKMSG: 


NARMSG: 


WIDMSG: 


STATE: 
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-BYTE 
ASC1Z 


-BYTE 
-ASCIZ 


-BYTE 
-ASCIZ 


-BYTE 
-ASCIZ 


-BYTE 
-ASCIZ 


-BYTE 
-ASCIZ 


eASCIZ 
-ASCII 


-ASCII 
-BYTE 


-ASCIZ 
-ASCIZ 


-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 


-ASCIZ 


15,12 
/CAMO1 G=2 X=/ 


15,12 
/CAMO2 G=1 X=/ 


15,12 
/CAMO2 G=2 X=/ 


15,12 

/CAMO3 G=1 X=/ 

15,12 

/CAMO3 G=2 X=/ 

15,12 

/JOYSTICK X=/ 

/ Y=/ 

<15><12>/DIFFERENTIAL LINEARITY:/ 


/ GAIN = / 
61,40,40,0 


-- / 
LSB/<15><12> 
SKIPPED STATE(S)/<15><12> 
* xERROR**/<15><12> 
OK/<15><12> 
NARROW STATE(S)4<15><12> 
# WIDE STATE(S)#<15><12> 


/STATE== WIDTH/<15><12> 


SEQ 0128 





On 
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052104 


046440 LINEA: .ASCIZ / LSB MAXIMUS AT / 
at 2: 


— us 
Ws & 


SLASH: .ASCIZ #&/# 
052101 MSG21: .ASCIZ /RELATIVE ACCURACY:/<15><12> 
041501 
054503 


020115 COMP:  .ASCIZ <15><12>/ROM BLASTING COMPLETED/ 


N= 2ONN 


NONMININN A ee 
Nm 


RRRRRRRRRREKR 
3 


— as SS SS SS Ss Ss SS SS SS SY YH 


052105 
052012 : <15><12>/TIMEOUT FROM BLASTER CHECK SWITCHES ON BLASTER/ 


051501 
051117 <15><12>/ OR REPLACE ROM IN BLASTER/<15><12> 


FIELDI: .BYTE 15,12 
-ASCIZ /INTERNAL MAINT. Z PULSES <Y FOR YES> ? / 


047506 
037123 
051105 <15><12>/AVERAGE OF 128 STATES = / 


15,12,7 
/EXCEEDED CORRECTION COUNTER FOR / 


15,12,7 
/ROM BLASTING ABORTED/ 
052122 





an 
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042105 
015 


900 012 007 -BYTE 15,12,7.0 
020040 026455 020040 SGNVAL: .ASCII /_ == / 

053 040 SGNVL1: .BYTE 53,40 

060 O36 LSBTXT: .BYTE 60,60,52,60,15,12,0 
000 RIN: -BYTE 15,12,0,0 


047514 BELMSG: .ASCIZ / BELOW LIMIT/<15><12> 
044515 


040515 NORMSG: .ASCIZ / NORMAL STATES/<15><12> 
052101 


000 
053117 ABOMSG: / ABOVE LIMIT/<15><12> 
044515 


042523 PASMSG: . / PASSED/<15><12> 
042514 FAIMSG: . / FAILED/<15><12> 


RRRRRKKF 


QR 
WNNAWO 


bs 
Oo 
5 


;AVERAGE COUNT 
LOC.*S CLEARED BY DIFLIN 


lelelelelelelelolelelolela) 
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105777 


137674 


137662 
042160 


137122 
042160 


137110 
042160 


060000 
042160 


137054 
137050 


000140 
000040 
137550 
002644 
000033 
000134 
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137534 
136774 


KEYBOARD CONVERSATION TO THE BLASTER 


8-AUG-78 
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SEQ 0131 


SELECT TEST ‘'T’’ 


sAPPLY POWER TO BLASTER AND DEPRESS I/0 AND EXECUTE BUTTONS 


z;ALL_INDICATORS SHOULD LIGHT 
;TYPE THE COMMANDS FOLLOWED BY 
TYPE MESO ALT” KEYS TO ABORT CURRNET COMMAND 


WILL NOT 
: KF 2/2 


THE BLASTER SHOULD SEND A ‘>'' CHARACTER 
A ''CR'', SOME WILL ECHO THE CR AND OTHERS 


7 THIS SETS OCTAL COMMAND ar 

THIS SET OCTAL INPUT/OUTPU 

THIS SIZES THE PROM -- 0037/8, ht. REPORTED BY THE BLASTER 
THIS READS THE PROM INTO THE R 


iTHIS OUTPUTS THE RAM CONTENTS a“ THE TTY 
THIS EXITS COMPUTER CONTROL TO THE BUTTON MODE 


“hn aati INPUT ? 


SAVE THE CHARACTER 
UPDATE COUNTER 


;PRINTER READY ? 


;BR I 
;PRINT THE CHAR. 
;BR IF MORE DATA 


YBOARD INPUT 
BR IF NOT 
; CHAR 


READ 
MASK THE DATA 
;TEST FOR CTRL C 
;BR IF CTRL C 
; TEST FOR RUBOUT 


BR IF ESC 
soe is WO IF — CASE 


SMAKE UPPER CASE 
LOAD BLASTER DATA OUT 


; JUMP TO RESTART 
;LOAD ESC <CANCLE> 


TYPE 
sTYPE FM30 
sTYPE SPC0037/8)] 
sTYPE LD 
sTYPE D00/37 
sTYPE 2ZP 
LOOPC TSTB @DLICSR 
BPL LOOPD 
NOP 
NOP 
NOP 
MOV ree (RO) + 
INC BLICN 
LOOPD: TSTB a$TPS 
BPL LOOPC 
TST BLICNT 
BEQ LOOPE 
MOV (R1)+,a$TPB 
DEC BLICNT 
BNE LOOPC 
BTALK: MOV #BUFO,RO 
MOV RO,R1 
CLR BLICNT 
BR LOOPC 
;COME HERE IS NO BLASTER DATA TO BE TYPED 
LOOFE: TSTB a$TKS KE 
BPL LOOPC 
MOV @$TKB,R2 
BIC #177600,R2 
CMP #3,R2 
BEQ $ 
CMP #177,R2 
BEQ LOOPF 
CMP R2,4140 
BLO 
BIC #40,R2 
1$: MOV R2,aDLODB 
BR LOOPC 
2s: JMP RBEGO 
LOOPF: MOV #33,aDLODB 
MOV #°\ ,aSTPB 
LOOPC 


BR 
BLICNT: 0 
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3A017 CORRECTION PROM VALUES <MEMORY RAM> 
ROMVAL: .BYTE  200,200,200,200,200,200,200,200 ;GAIN = 1 VALUE 


-BYTE 200,200,200,200,200,200,200,200 
-BYTE  200,200,200,200,200,200,200,200 ;GAIN = 2 VALUE 


4 
«BYTE 200,200,200,200,200,200,200,200 


3A017 CORRECTION PRAM VALUES <RAM MEMORY> 
;ROMVAL MUST BE IN COMPLEMENTED AND REVERSED ORDER <LSB=MSB> 
RAMVAL: .BYTE  376,376,376,376,376,376,376,376 ;GAIN = 1 VALUE 
BYTE 376,376,376,376,376,376,376,376 
«BYTE  376,376,376,376,376,376,376,376 ;GAIN = 2 VALUE 


-BYTE  376,376,376,376,376,376,376,376 


3M8036 PROGRAM PROM VALUES 


PROROM: .BYTE  215,244,116,144,215,244,116.144 ;M8036 PROGRAM PROM 


BYTE =.215,244,116,144,215,244,116,144 


«BYTE =116,144,216,244,377,377,377,377 


BYTE 377, 377,377,377 .377,377,377,377 
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;BLASTER SECTION 
051046 BLAST: TYPE PRIMO TELL OPERATOR ABOUT THE CABLE 
051460 T PRIMS SAND SWITCHES 
000001 137336 #B1T0,aDLICSR ; ENSURE INIT. ROM CONTROL LINE 
043112 R5,RDBLST ;TELL THE BLASTER TO INITILIZE 
ZREALLY WE ARE WAITING FOR THE OPERATOR 
043112 R5,RDBLST TELL THE BLASTER THE KEYBOARD INPUT MODE 


043112 R5,RDBLST ; TELL THE BLASTER THE DATA FORMAT <ASCII-OCTAL> 


FMO 
;PRIME THE MEMORY RAM BUFFER 
042162 MOV #ROMVAL ,RO GET POINTER 
000200 1$: #200, (RO)+ ;LOAD THE BUFFER 
042222 #ROMVAL+40,RO ;TEST IF DONE 
1$ 7BR IF BUFFER NOT PRIMED 
046146 #36,PRIME1 ;LOAD GAIN AND RESOL. VALUES 
R5,LIMITS ;LOAD DIFLIN ERROR LIMIT VALUES 
[G1 LIMIT = USERS 
3G7 LIMIT = OPTION CHECKOUT 
040773 #°1,GAINI [LOAD GAIN TYPEOUT VALUE 
041740 #ROMVAL +1 , ROMPNT ;LOAD RAM POINTER 
PC,4$ ;TEST THAT GAIN 
046146 #2036, PRIME 1 ;LOAD GAIN AND RESOL. VALUES 
R5,LIMITS ;LOAD DIFLIN ERROR LIMIT VALUES 
7G2 LIMIT = USERS 
7G2 LIMIT = OPTION CHECKOUT 
040773 #'2,GAIN1 [LOAD GAIN TYPEOUT VALUE 
041740 #ROMVAL +21 .ROMPNT ;LOAD RAM POINTER 
+ 3TEST GAIN OF 2 
#3,100$ ;LOAD LOOP COUNTER 
: #1 ,DIFEX1 ;LOAD DIFLIN EXIT FLAG 
046150 #6$ ,DIFEXO | ;LOAD DIFLIN EXIT RETURN 
PC, ZAPRAM 4 BLASTER RAM HAS BEEN LOADED WITH 
THE "'RAMVAL'' VALUE 
DIFLNO [RUN "DIFLIN' 
PC ,ADJF IX TADJUST AND FIX THE CORRECTION WEIGHTS 
100$ ;HAS THIS SECTION BEEN EXECITED N TIMES 


5$ BR IF NOT 
om TEST IF ERROR OCCURRED? 


[BR IF NOT 
UNF 1X ; TELL THE OPERATOR 
GAINX SABOUT IT 
ABORTB [TELL OPER. THE BLASTING IS ABORTED 
002644 —e ee 
- s x 
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053110 


043112 
043112 
043112 
043274 
043112 
052051 


041222 
002644 


042222 
042162 


042222 


043276 


000001 
043172 


043112 
043112 
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; THE RAM DATA IS NOW CORRECT = BLAST THE BLANK ROM 
10S: JSR R5,RDBLST ;TELL THE BLASTER TO COMP. THE DATA 


R5,RDBLST ; TELL THE BLASTER TO CHECK=SUM DATA 
R5,RDBLST ;TELL THE BLASTER TO BLAST THE ROM 


NOEXIT SET FLAG TO EXIT WITHOUT RECPT OF ‘>** CHAR FROM BLASTER 
R5,.RDBLST ;TELL THE BLASTER TO RETURN TO KEYPAD MODE 


ZP0 
THE OPERATOR ABOUT THE BLASTER ROM 
- PRIMI ;TELL OPERATOR TO REMOVE RAM CABLE AND INSTERT ROM INTO AQ17 


(SP)+,RO ;CLEAN STACK 
COMP ; COMPLETED 
RBEGO 

100$: 


; SUBROUTINE TO CONVERT THE MEMORY RAM VALUE INTO RAM MEMORY VALUE 


#RAMVAL ,R3 ;LOAD OUTPUT POINTER 
#ROMVAL ,RO ;LOAD INPUT POINTER 
(RO)+,R1 ;GET A BYTE 
1 ; INVERT VALUE 
[CLEAR RESULT 
:MOVE INTO CARRY 
CARRY INTO BIT 
INTO CARRY BIT 
CARRY INTO BIT 


oe 2 oo © & & S&S ©& 


BIT 
R2 ; CARRY INTO BIT 
R2,(R3)+ 3$ OUTPUT BYTE 
IF END 


RO, AROMVAL +40 
1$ F NOT 


BNE :BR I 
epee TO LOAD MEMORY RAM INTO RAM MEMORY 
RS, CONROM CONVERT ‘ROMVAL'' TABLE INTO BLASTER FORMAT 


136724 IS MBITO,ADLICSR ;ENABLE RAM MEMORY TO BE LOADED 
R5,RDBLST ;TELL THE BLASTER THE NEW RAM DATA 


R5,RDBLST ;TELL THE BLASTER TO CHECKSUM THE DATA 
R5,RDBLST 7: TELL THE BLASTER TO PROGRAM THE RAM-PAK 
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5605 042774 042777 000001 136674 BIC MBITO,@DLICSR ;RE-ENTER EMMULATE MODE 
5606 043002 000207 RTS PC sEXIT 
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BLASTING THE PROGRAM PROM (M8036) 


136660 


PBLAST: 


8-AUG-78 


TYPE, 
BIC 
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PRIM3 
#B1T0,aDLICSR 
R5,RDBLST 


R5,RDBLST 
R5,RDBLST 
RS, CONROM 
R5,.RDBLST 
R5,RDBLST 
R5,RDBLST 


NOEXIT 
R5,RDBLST 


COMP 
RBE GO 


; INFORM THE OPERATOR 

sENSURE ROM MODE 

;TE-u THE BLASTER TO INITILIZE 

;T:ILL THE BLASTER THE KEYBOARD INPUT MODE 

;TELL THE BLASTER THE DATA FORMAT <ASCII-OCTAL> 
CONVERT THE ‘PROROM’’ TABLE INTO BLASTER FORMAT 
TELL THE BLASTER THE PROM DATA 

;TELL THE BLASTER TO CHECKSUM THE DATA 

;TELL THE BLASTER TO BLAST THE PROM 


7SET FLAG TO EXIT WITHOUT RECPT OF *>** FROM BLASTER 
;TELL THE BLASTER TO RETURN TO KEYPAD MODE 


; INFORM THE OPERATOR IT'S DONE 


SEQ 0136 
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;COME THERE TO OUTPUT “~ MESSAGE TO THE are 

ZEXIT ONLY WHEN THE BLASTER HAS ECHOED AN * 

;REPORT AN ERROR UPON TIMEOUT vars PNORXIT"" IS NON-ZERO 
RDBLST: MOV RO,~(SP) corT AR RO 


ARG. 
043272 ;LOAD a te FOR ERROR COUNTER 
;LOAD A CHAR 
043266 @DLIBD,11$ a READ TO CLEAR READY 
@DLOCSR WAIT FOR OUTPUT READY 


by ;TEST IF FINISHED ? 
(RO) +,10$ :GET A CHAR. 
2s ;BR IF TERM 
043264 136516 10$,aDLODB oe tity THE CHARACTER 
136504 : ;WAIT FOR INPUT 
4$ [BR IF INPUT 
043270 3 DELAY 
043272 ie, DELAY 
043274 TEST IF EXIT IS ALLOWED WITHOUT ‘>*’ 
5$ BR IF YES 


041253 F 
002644 


136444 043266 3 @DLIBD,11$ READ CHAR 


Wh 


177600 043266 #177600,11$ MASK OFF BITS 
000076 043266 #'>,11$ ; TEST FOR > 
1$ 3; TRY NEXT CHAR. 
(SP)+,RO RESTORE RO 


043274 : NOEXIT 
R5 ZEXIT 


000000 





nn 
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CZNCCA.P11 A TO D FIELD SITE AND ADJUSTMENT LOOP SEQ 0138 
5670 
5671 ; CONVERT any DATA — PROM BLASTER FORMAT 
5672 043276 012700 052676 CONROM: #DIDATA+3,RO LOAD RESULT POINTER 
5673 043302 012501 mov (R5) + RI SLOAD INITIAL VALUE POINTER 
5674 043304 010137 043360 MOV R1,10$ COPY THE START 
5675 043310 062737 000040 043360 ADD #40,10$ sMAKE THE END ADDRESS 
5676 043316 111102 1$: MOVB (R1),R2 :GET A BYTE OF DATA 
5677 043320 004737 043402 JSR PC, SHUFO CONVERT IT TO ASCII 
5678 043324 111102 MOVB (R1),R2 GET SAME BYTE AGAIN 
5679 043326 004737 043374 JSR PC, SHUF 3 : CONVERT 2ND DIGIT 
5680 043332 112102 MOVB (R1)+,R2 :GET MSD 
5681 043334 004737 043362 JSR PC, SHUF6 : CONVERT IT 
5682 043340 062700 000007 ADD #7,RO ; UPDATE RESULT POINTER 
5683 043344 000240 NOP 
5684 043346 000240 NOP 
5685 043350 020137 043360 CMP R1,10$ s TEST IF DONE 
5686 043354 001360 BNE 1$ 
5687 043356 000205 RTS R5 sEXIT 
4 043360 000000 10$: 0 
cat ROTATE THE DATA RIGHT AND MAKE ASCII CHARACTER 
5692 043362 042702 177477 SHUF6: BIC #177477 ,R2 sMASK OFF BITS 
5693 3 006202 ASR R2 
5694 043370 006202 ASR R2 
5695 043372 006202 ASR R2 
5696 043374 006202 SHUF 3: ASR R2 
5697 043376 006202 ASR R2 
5698 00 006202 ASR R2 
5699 043402 042702 177770 SHUFO: BIC #177770,R2 :MASK OFF BITS 
5700 043406 062702 000060 ADD #60,R2 sMAKE ASCII 
5701 043412 110240 MOVB R2,-(RO) ;LOAD RESULT BYTE 
5702 043414 000240 NOP 
5703 043416 000240 NOP 
5704 043420 000207 RTS PC sEXIT 


any 


CZNCCA NCV11 
CZNCCA.P11 
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(12637 
013746 


012637 


111203 
000240 


062036 
041740 


000017 


041744 


000316 


043706 
043710 
041744 
036616 


041732 
041730 


177400 


; SUBROUTINE TO ADJUST THE LSB VALUES 
MOV #BUF 


ADJF IX: 


10$: 


AVGVAL ,R1 
AVGVAL ,R1 
R1,LSBSVW 


$16 ots 


(SP)+,101$ 


100$,-(SP) 
101$,-(SP) 
AVGVAL ,~(SP) 
Sainte 


1$: V (SP)+,LSBSVR 
MOV (SP)+,LSBSVQ 
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;GET BUFFER POINTER 
[GET ROM POINTER 


sMAKE END VALUE 
3GET LSB (17) 2 
:ADD LSB (00) M 


:SUB 2 LSB AVG. 
SAVE FOR LATER USAGE 


SAVE ON STACK 
MULTI BY 376 (8) 


s SAVE LSW 
sSAVE MSW 


;BR IF NO ERROR 


SAVE INTGR. REMAINDER 
SAVE QUOTIENT 


NOW ADD THE QUOTIENT TO THE MEMORY RAM VALUE 


a (R2) ,R3 
#177400,R3 


GET CURRENT MEMORY RAM VALUE 
:CLEAR OFF UPPER BITS 


SEQ 0139 
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163703 041730 LSBSVQ,R3 
000240 


0 
MOVB R3,(R2)+ 
NOW UPDATE ‘™’' VALUE POINTER 


000036 #36 ,RO 
(RO) ,R1 


LSBSVW,R1 


000207 


000000 
000000 


;ADD THE QUOTIENT 


;RELOAD MEMORY RAM VALUE 


;UPDATE POINTER 
GET VALUE 


CORRECT THE VALUE (410) 


RESTORE FOR NEXT USAGE 
; TEST WHEN FINISHED 
;BR UNTIL DONE 


sEXIT 


SEQ 0140 





An 


L 11 
CZNCCA NCV11_ DIAGNOSTIC MACY11 27(654) 8-AUG-78 15:05 PAGE 129 
CZNCCA.P11 A TO D FIELD SI’E AND ADJUSTMENT LOOP SEQ 0141 
i ha LINEARI’Y 
041736 DIFLIN: CLR DIFEX1 ;CLEAR EXIT FLAG 
000061 040773 MO #'1,GAIN1 [LOAD GAIN MESSAGE VALUE 
001134 a $AUTOB :TEST IF E pete MONITOR 


10$ :BR IF 
040730 


GAIN 
043712 ST DIFLIN sTEST BIT 15 
BM 10$ :DONT TELL OPER. ABOUT AQ17 

051046 PRIMO TELL OPERATOR ABOUT A017 
000036 046146 : MOV #36,PRIME1 [LOAD RESOLUTION AND GAIN 
046152 RS,LIMITS ;LOAD DIFLIN TOLERANCE 

:G1 USER LIMIT 

G1 OPTION AREA 

043776 046150 DIF — SLOAD RETURN ADDRESS 
000062 040773 : #'2,GAIN1 LOAD GAIN MESSAGE VALUE 
002036 046146 #2086, PRIME] ;LOAD RESOLUTION AND GAIN 
046152 R5,LIMITS ;LOAD DIFLIN TOLER*‘NCE 

:G2 USER LIMIT 

G2 OPTION AREA 
044044 046150 MOV #2$ ,DIFEXO ;LOAD RETURN ADDRESS 
001134 $AUTOB :RUNNING UNDER MONITOR 


040730 
177777 050106 28: #-1 ,RUNDIF ENTER VIA ‘¥** SELECTION ? 
3$ NOT 


BR IF 
030076 $EOP YES REPORT END OF PASS 
002644 2 RBEGO 


;DIFLIN 
041744 DIFLNO: MOV #AVGVAL ,RO LOAD CLEARING POINTER 
DIFLNX: (RO) + 
041776 #F IRST+2,RO FINISHED ? 
DIFLNX ;BR IF NOT DONE 
060000 0,RO ;LOAD BUFFER POINTER 
1$: ;CLEAR THE DATA BUFFER 
064000 i ES acc 


BNE : 
:LOOK FOR THE DATA REGION FOR TO 
045774 JSR PC,STDATO FIND THE NON-ZERO TO ZERO TRANS. DATA 
:DATA HAS NOW GONE INTO THE GOOD 0 DATA REGION 
012777 000000 135616 MOV #0,aKWPSR sINIT THE CLOCK PRESET 
012777 000025 135604 MOV 4259 akWCSR TENABLE THE CLOCK 
“NOW TIME ''T1'’ LENGTH 
045640 3$: JSR PC,LISTDT :GET CURRENT DATA VALUE 
000000 MP #O.R2 ‘TEST FOR EXIT OF 0 DATA REGION 
2s :BR UNTILL DONE 
135570 aKWCSR1 


000002 135562 #B1T1,aKkWCSR1 TFIRE ST2 
017737 135560 046032 aKWPSR, DIFT1 ZSAVE COUNTER VALUE 
NOW TIME) M2" LENGTH 





an 
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052777 


045640 
000377 


135536 
000002 
135526 
045640 
000377 
135504 


000002 
135474 
135462 


046034 
046036 


046040 
045774 


046040 
135432 
00002 
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135530 
046034 


135476 
046036 


135420 


3$: PC ,LISTDT ;GET CURRENT DATA VALUE 
#377,Ro “TEST FOR ENTRY INTO MAX DATA REGION 
3$ ‘BR IF NOT 


@akWCSR1 
#B1T1 ,akWCSR1 sFIRE ST2 
MOV aKWPSR, DIFT2 SAVE COUNTER VALUE 
jNOW TIME “'T3°*L 


NGTH 
is: JSR ee LISTDT :GET CURRENT DATA VALUE 
#377 ,R2 sTEST FOR EXIT OF MAX DATA REGION 


4$ é 

@aKWCSR1 

#B1T1,aKWCSR1 FIRE ST2 

akwPSR, DIFT3 ;SAVE COUNTER VALUE 


akWCSR ;STOP CLOCK 
3NOW DETERMINE THE AVG TIME (13+T2)/2 AND SAVE_IN ‘HT2T3"' 
DIFT2,RO GET T2 VALUE 
ADD pa te -RO ADD T3 VALUE 


—- i/2 
RO,HT2T3 ;SAVE FOR LATER USE 
> NOW RETURN TO LIST "MODE AND LOOK FOR THE NON-ZERO TO ZERO EDGE AGAIN 
DIFLN1: JSR PC,STDATO FIND THE EDGE 
NOW START THE CLOCK USING THE AVG TIME 
AND DO AN MATRIX MODE COLLECTION 
MOV HT2T3,RO :GET AVG CLOCK 
R iF IX FOR CLOCK PRESET REG 
RO, @KWPSR PRESET 
#20,aKWCSR 
#CLRALL ,@SFR 
#BUF 0 , @OF F : 
awCR ;CLEAR Z COUNTER 


@BAR 

PRIME1,aCSR 7SET MODE AND RES. 
MTESTZ!BIT4,aSFR SET TESTZ - TESTX 
#B1T0.aCSR SENABLE NCV11 
#B1T0,aKwWCSR TENABLE CLOCK 

- rrr. TWAIT FOR CLOCK FLAG 


$ 
#ENDDMA , aSFR STOP DMA XFR 





C 
C 
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THE MATRIX MODE XFR IF NOw COMPLETED 
[NOW may ts ae) B.TE DATA COLLECTION INTO A TOTAL INCREMENT BUFFER 


050100 
060900 #BUF 0, RO 


012701 062000 #BUF 1, R1 
111037 050100 : es -STEMP1 GET THE WOR 
050100 AD goes (R1)+ 


CLEAR THE BYTE TABLE ENTRY 
THE LIST 


-(R1) 
177777 #-1,(R1)+ 
000 3$: #BUF 2,R1 


BNE 2$ : 
;GET THE AVERAGE OF i 128 CENTER STATES 
062100 MOV ~ pate +64. ,R0 iGET INITIAL POINTER 


R2 
4$: (RO) +,R1 7GET A VALUE 
5$ 7BR IF NO CARRY OVERFLOW 
R2 UPDATE MSW 
5$: #BUF1+192.,RO FINISHED THE BUFFER 
BNE 4$ 7BR IF NOT DONE AVERAGE 


R2 ROTATE MSW 
R1 INTO LSW 


R2 sROTATE MSW 
R1 : INTO LSW 


sROTATE MSW 
zs INTO LSwW 


;ROTATE MSW 
z INTO LSwW 


ROTATE MSW 
INTO LSwW 


ROTATE MSid 


041744 R1, AVGVAL 

046042 PC,.CTRLCG T 

041744 041742 AVGVAL , NOMI AL TTEST IF AVG. IF > 
DIFLNI [BR IF NOT 
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013737 


103446 


00423 
005237 
000420 
122737 


036616 


045266 


045266 
045270 


045270 
045270 
045270 
000053 
041750 
041752 
000053 
041762 
041766 
000053 
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045260 


045256 


041606 
041606 


046207 
046211 
046213 
041606 


041606 


041606 
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;READ THE TOTAL INCREMENT BUFFER AND DETERMINE IF ANY VALUES OUT OF RANGE 
GET AVERAGE 


READ1: 


1$: 


2$: 
3$: 


4$: 


5$: 
sDIFLIN 
6$: 


7$: 
20$: 


223: 
21$: 


AVGVAL , 101$ 
#1,R0 


#BUF1+2,R1 
(R1)+, 100$ 
1018, 1008 


100$ 
— 


#*+,SGNVL1 
100$,-(SP) 
PC, $MULT 

(SP)+,107$ 


;GET A WORD 
sREMOVE THE AVERAGE 


z INSERT ‘'="" SIGN 
; INSERT *'+’’ SIGN 


MULTIPLY NUM-AVG BY 1000. 
:GET RESULT 


sDIVIDE RESULT 
:DIVIDE AGAIN 


4$ 
FATAL ERROR DURING CAL. OF ERROR TOLERANCES 


(SP)+,104$ 
(SP)+,105$ 
101$,R2 

R2 

104$,R2 

5$ 

105$ 


N 
ERROR CHECK 


105$ .NORTOL 
50$ 
105$,NARTOL 
20$ 
105$,NURTOL 
21$ 


#*+,SGNVL1 
- 7$ 


#*+,SGNVL1 


:GET REMAINDER 
T QOUT 
ROUND UP IF NEEDED 


; COMPARE RESULT 
ROUND UP 


i TEST AGAINST NORMAL 
:TEST AGAINST WIDE/NARROW TOLERANCE 


:BR 

; TEST AGAINST LARGE/SMALL TOLERANCE 
[BR IF OK 

sTEST IF + 


;COUNT THE LOWER VALUE 


COUNT THE HIGHER VALUE 
TEST IF + 

;COUNT THE LOWER 

COUNT THE HIGHER 

sTEST IF + 
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DIAGNOSTIC 


041760 
041764 


041754 
000115 


001134 


041774 
041774 
041446 
041744 
041617 
041132 

001 
000115 


040777 
045256 


045270 
037232 


041600 
046042 
000377 
044602 


MACY11 27(654) 


052474 


052474 


ae aed eed ae oe i eed ed ed oth 
- —-OCOd000009 
=ODNAUESWNM— SO 
PRAAAHAMMWHWHH 


8-AUG-78 
A TO D FIELD SITE AND ADJUSTMENT LOOP 


C 12 
15:05 PAGE 133 


23$ 
NARA 
51$ 
WIDA 
51$ 
NORMAL 
#°M,RUNIT 
77$ 
$AUTOB 

7$ 


BNE 7 
THE STATE INFORMATION 
TST FIRST 


leleleleleleleleleole) 


10$ 

FIRST 

-AVRGO 
AVGVAL ,~(SP) 


RIN 
STATE 
RO,-(SP) 


3,1 
#'M,RUNIT 
11$ 


DASH 
100$,-(SP) 
105$,-(SP) 

PC ,$SB2D 
(SP)+,R2 
#2,R2 
(R2)+,LSBTXT 
(R2)+,LSBTXT+1 
(R2)+,LSBTXT+3 
SGNVAL 
PC,CTRLCG 

RO 

#255.,RO 

READ 

1$ 


;COUNT THE LOWER 
;COUNT THE HIGHER 


;COUNT THE NORMAL 
TEST IF FORCE REPORT 


;TEST IF MONITOR ? 
;BR IF YES 


zFIRST TYPEOUT ? 
;BR a YES 


:SET FLAG 
TELL. THE OPERATOR THE AVERG. 


z;ADD HEADER INFO 

;LOAD STATE # 

TEST IF EXPAND OUTPUT SELECTED 
INSERT SPACING 

REPORT DIFFERENCE 


;CONVERT TO ASCII 
GET RESULT POINTER TO MESSAGE 
;ADJUST POINTER 


;TEST IF CTRL C/G 


TEST IF DONE 
[BR IF DONE 
TRY NEXT VALUE 


SEQ 0145 
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CZNCCA NCV11 ery Ic 
FIELD SITE AND ADJUSTMENT LOOP SEQ 0146 


CZNCCA.P11 TO D 


NOW ACCOUNT FOR ALL THIE ERRORS 
041746 READ: CLR DIFERR CLEAR FLAG 
MO ;GET HIGH VALUE 


sADD LOW 

046214 ;TEST IF EXCEEDS LIMIT <OBEASE ABOVE/BELOW> 
;BR_IF ERRORS 

041760 GET LOW VALUE 

041764 ADD HIGH 

046212 or NURC TEST IF EXCEEDS LIMIT <LARGE ABOVE /BELOW> 


041762 GET LOW VALUE 
ADD HIGH 
‘ TEST IF EXCEEDS LIMIT <SMALL ABOVE /BELOW> 
046206 041754 os TEST IF MIN. NORMAL COUNT HAS BEEN HIT 
041702 045516 a ;LOAD MESSAGE POINTER 


BR 2 
041714 045516 1$: AMFAIMSG,READ7 ;LOAD nowy POINTER 
041746 I DIFERR ;SET ERROR FLAG 
041750 2$: MO BELOW,-(SP) :GET NO. OF STATES BELOW LIMITS 
[REPORT VALUE 
041623 -BELMSG TYPE MESSAGE 
041760 NARA,R2 SGET NARROW LOW 
041762 NARB,R2 TADD NARROW HIGH 
R2,-(SP) GET NO. OF NARROW STATES 


041066 -NARMSG ; TYPE MESSAGE 
041754 MO NORMAL , = (SP) ;GET NORMAL COUNT 


041642 REPORT NORMAL TEXT 

041764 V ;GET WIDE LOW 

041766 ADD WIDE HIGH 
R2,-(SP) 


041111 -WIDMSG ; TYPE MESSAGE 


041752 MOV ABOVE , (SP) 
PDS 7 TYPE NO. OF STATES ABOVE LIMIT 
041663 TYPE ,ABOMSG TYPE MESSAGE 


REPORT PASS/FAIL MESSAGE 
040730 TYPE, GAIN ;RE-TYPE THE GAIN MESSAGE 


TYPE 
041702 READ7: PASMSG REPORT PASS/FAIL 
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045630 
045634 


DIAGNOS 


032777 


000207 


005037 
000177 


TIC 


004000 
041736 


042162 


041617 
000020 
041617 
177400 


001 
041002 


041736 
000310 


MACY11 27(654) 8-AUG-78 
A TO D FIELD SITE AND ADJUSTMENT LOOP 


133412 


E 12 
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; TYPE OUT MEMORY ona AND RAM sY ie 7 IF SELECTED 


READXX: are 


1,@SWR 
4$ 
DIFEX1 
4$ 


#ROMVAL ,RO 
PC,2$ 
ees 


F THIS IS WANTED 


;BR IF NOT 
STEST IF BLASTING MODE 
BR IF NOT 


;LOAD INITIAL POINTER 
; TYPE OUT LINE 

STEST IF ALL DONE 

[BR IF NOT 


;LOAD WIDE COUNTER 


0 2 
#177400, R2 
R2,-(SP) 


;GET A BYTE 
[MASK OFF HIGHER BITS 
;LOAD VALUE 


FINISHED ? 
sEXIT 


DIFEX1 
aDIFEXO 


EXIT THIS CRAZYNESS 


SEQ 0147 
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DIF LIN SUBROUTINE LIST MODE DATA COLLECTOR 


004000 134110 LISTDT: MOV ACLRALL ,@SFR CLEAR THE DEVICE 
CLR @OF F ;PRIME OFFSET REG. 
134072 LOAD WC. 
134066 LOAD BUS ADDR. 
134052 #0,aCSR 
046146 operon’ 


134034 #2000,a@CSR 
134036 : ATESTZ,@SFR Z 
052777 000001 134020 #B1T0,aCSR ENABLE THE DEVICE 


105777 9134014 : a ;WAIT FOR IDLE 
060000 ~ weap ;LOAD POINTER TO NEW DATA 


000010 #8. ,R3 ;LOAD COUNTER 
(RO) ,R1 


(RO) + 
177400 #177400,R1 
R1,R2 UPDATE TOTAL 
FINISHED ? 
;BR IF NOT 


TS PC sEXIT 
; SUBROUTINE TO FIND a TRUE EDGE OF ZERO DATA 
012737 177777 046030 STDATO: MOV #-1,10$ ;SET ENTRY FLAG 
004737 045640 1$: PC, LISTDT :GET DATA 
005702 T R2 ZCHECK DATA 
001403 2$ ;BR_IF ZERO 
005037 046030 10$ ;CLEAR ALREADY NON-ZERO DATA FLAG 


000771 


BR 1$ 
;DATA WAS ZERO - CHECK IF WE STARTED . }4 DATA REGION 
005737 046030 2$: TST 10$ ; TEST 
BNE 1$ ;BR IF NOT A GOOD TIME TO EXIT 
ee oot NOW GONE TO A GOOD ZERO DATA REGION 
iN 


RTS PC ;BYEBYE 
10$: 


0 
DIFT1: O 
DIFTZ: © 
DIFTS: O 
HT2T3: O 
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; SUBROUTINE TO TEST IF OPERATOR TYPED CTRL C OR G 
105777 133076 CTRLCG: ME I a$TKS ; INPUT FLAG 


2$ BR IF NON 
133072 046140 @$TKB,CTRCHA [GET CHARACTER 
046140 #177600,CTRCHA ;MASK OFF BITS 
046140 #3,CTRCHA Ay IF CTRL C 
1$ BR IF NOT “C 
133654 #ENDDMA , aSFR :STOP NPR*S 


133640 ACLRALL ,@SFR ;CLEAR THE DEVICE 
(SP) + ;CLEAN STACK 
RTRT >RE-START 
046140 : #7,CTRCHA ;TEST IF CTRL G 
2$ SBR IF NOT 


:GET SWR VALUE 
PC TEXIT 


DIFEXO: 0 


; SUBROUTINE TO DETERMINE ERROR LIMITS FOR DIFLIN 
LIMITS: MOV (R5)+,RO GET 1ST ARG 
050110 TST wr MODE ae in mor ON TESTER 


1$ 
a iGET TESTER LIMITS 


: (R5)+ ;BUMP ADDRESS 

046206 $ ANORCNT ,R1 :GET POINTER 
(RO) +, (R1)+ ;GET VALUE 
(RO) +, (R1)+ 
(RO) +, (R1)+ 
(RO) +.(R1)+ 
R5 


sEXIT 


SEQ 0149 





CZNCCA NCV11 
CZNCCA.P11 


DIAGNOSTIC 


A TO D FIELD SITE AND ADJUSTMENT LOOP 
z;ACTUAL VALUES FOR DIF LIN ERROR TOLERANCE 


:DIFLIN ERROR TOLERANCE 


GILIMO: .BYTE 226.,21. 
-BYTE 20.,51. 
.BYTE -* 2 
«BYTE 0.,377 


;DIFLIN ERROR TOLERANCE 


GILIM1: .BYTE 
-BYTE 
-BYTE 
-BYTE 


:DIFLIN ERROR TOLERANCE 


G2LIMO: .BYTE 216.,25. 
-BYTE 30.,59. 
-BYTE 8.,121. 
MT O.rr7 


:DIFLIN ERROR TOLERANCE 


G2LIM1: .BYTE 
-BYTE 
-BYTE 
-BYTE 
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SEQ 0150 


z' NORMAL'* MIN COUNT VALUE 
3" NORMAL" * TOLERANCE VALUE 
7" NARROW/WIDE'’ MAX. COUNT VALUE 
z’ NARROW/WIDE'’ TOLERANCE VALUE 
z"LARGE/SMALL'* MAX. COUNT V/LUE 
3" 'LARGE/SMALL'* TOLERANCE VALUE 
zOBESITY'’ MAX. COUNT VALUE 
s"OBESITY'’ TOLERANCE VALUE 


GAIN = 1 USER 


3226 MIN. COUNT, =<2.0% 
720 MAX. COUNT, =<5.0% 
38 MAX. COUNT, =<10.% 

70 MAX COUNT, >10% 


GAIN = 1 OPTION AREA 
3226 MIN COUNT, =<1.9% 

720 MAX. COUNT, =<4.8% 

38 MAX COUNT, =<9.5% 

30 MAX COUNT, >9.5% 

GAIN = 2 USER 

5 MIN COUNT, =<2.4% 


114. MAX COUNT. 
‘0 MAX COUNT, >12.0% 


GAIN = 2 OPTION AREA 


3216. MIN COUNT, =<2.0% 
330. MAX COUNT, =<5.0% 

:8. MAX COUNT, =<10.0% 

70 MAX COUNT, >10.0% 
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LISTO: .BYTE 15,12 
eASCII = /1 = INITIAL A017 ADJUSTMENT USING THE ANALOG TESTER/ 


051505 


Lt a 
Berit /B = BLASTING OF THE LINEARITY CORRECTION PROM/ 
052040 
047111 
054524 
042522 
020116 


15,12 
047503 7C = CONTROL PROGRAM PROM BLAST ING/ 


LIST: -BYTE 15,12 
-ASCII /L = LOGIC TEST OF M8026 AND M8036/ 


brErPPrrrrrrrrrrrrrrrrrrrrrrrry OO 


034115 


12 


15, 
042040 /D = DIFFERENTIAL LINEARITY OF THE AQ17/ 


040440 
15,12 
043040 /F = FINAL ACCEPTANCE (L AND D)/ 


042040 


15,12 
040440 /& = ADJUSTMENT OF AQ17 AT FIELD SITE/ 


r 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
f 
r 
A 
A 
A 
A 
A 
r 
f 
f 
f 
f 


046664 
046672 052101 043040 042511 
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051440 052111 


-BYTE 12 


047440 -ASCII OPERATE WITH TTY AT ADDRESS NNNNNN/ 


047116 


15,12 
051440 /S = SOFTWARE SWITCH REGISTER CHANGE/ 


Orrrrrrrrrrrrrrrrryrn OO 


042507 
15,12 
H = 


042510 / 
042510 
040522 
047101 
054524 
044510 
044514 052123 


012 LISTI: .OYTE 15.12 
000 DOT: eASTIZ /./ 


047106 -EVEN 


HELP THE OPERATOR AND RETYPE THIS LIST/ 


mmmmrammmmmmrn 
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DIAGNOST 


IC 


A TO D FIELD SITE AND ADJUSTMENT LOOP 


000005 
104401 
012777 
005077 
005037 


105777 


001372 


012777 


052777 


052242 
046140 


132560 


001000 
132544 


001000 
010421 
003740 
050044 


004000 
000000 
050044 
000040 
007740 


050044 
010000 


000005 


000400 


POTIME: RESET 
TYPE, PRI 


M2 
132564 #6035, asm 
avTYPO 
CrRCHA 


; ERASE “ SCREEN MAP 
$: STB aVvTCSR 
BPL 1$ 
132550 BIS #BIT9,aVTCSR 
2 TSTB aVTCSR 


BPL 2$ 
132534 BIC #BIT9,aVTCSR 


;NOW LOAD THE REF. PATTERN INTO 
MOV #10421,R1 


Ld 


#3740,R 
3$: PC,DISPLY 
RO 


#4000,RO 
3$ 


#0,RO 
PC,DISPLY 
RO 
#40,RO 
4$ 


#7740,R0 
PC,DISPLY 


RO 
#10000,RO 
5$ 


zPOSITION THE MAP AND DISPLAY 


132442 #5,aVTCSR 
#60, aVTINT 
#463, aVTINT 

132420 #B1T8,aVTCSR 
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SEQ 0153 


;CLEAR THE WORLD 

; TELL OPERATOR ABOUT CABLES 
HOME AND ERASE SCREEN 
;CLEAR THE MAP P.C. 

;CLEAR TTY CHARACTER 


:WAIT FOR READY 


SCLEAR THE MAP 
“WAIT FOR READY AGAIN 


;CLEAR THE ERASE BIT 
THE MAP 

;LOAD THE PIXEL VALUE 
;LOAD ha PIXEL ADDRESS 
;LOAD THE DATA 

[UPDATE THE ADDRESS 
FINISHED ? 

BR UNTIL DONE 


;LOAD ane no 
;LOAD THE DATA 

[UPDATE THE PIXEL ADDRESS 
:TEST IF 

;BR IF DONE THE VERTICAL 


;LOAD PIXEL _ 

;LOAD THE DAT 

UPDATE THE PIXEL ADDRESS 
TEST IF DONE 

BR IF DONE 


° 


;LOAD ara VALUE 
SLOAD L UT 0 

;LOAD LUT 1 
ENABLE THE MAP 





AIM 


@oODOMomnoD TWO 


AAMAAAAIAAAIAAANAAANAAOOCWVW 
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004537 
6 


047422 


000 
047422 


000 
047422 


000 
047422 


000 


047422 


001 
047422 


001 
047422 


001 
047422 


001 
002644 


NOW SAMPLE THE CAMERA CHANNELS 
SAMCAM : 


NPUT 
R5,ADJCAM 


-BYTE 
DO CAMERA 3, X 
JSR 


ADMSG6 
DAC3 


-BYTE 3,0 ; CAME 
NOW SAMPLE THE — CHANNELS 


DO CAMERA 0 Y 
JSR 


-BYTE 
DO CAMERA 2, Y 

JSR 
ADMSGS5S 
DAC3 


;DO CAMERA 3, Y 
JSR 


0,0 
INPUT 
R5,ADJCAM 


1,0 
INPUT 
R5,ADJCAM 


2.0 
INPUT 
R5,ADJCAM 


R5,ADJCAM 


0,1 
INPUT 
R5,ADJCAM 


INPUT 
RS, ADJCAM 


3,1 
RBE GO 


*CAM 0 MESSAGE 
‘DAC ADDRESS 
[CAMERA 0, X AXIS 


CAM 1, X MESSAGE 
;DAC ADDRESS 
CAMERA 1, X AXIS 


CAM 2, X MESSAGE 
DAC ADDRESS 
;CAMERA 2, X AXIS 


CAM 3, X MESSAGE 
[DAC ADDRESS 
RA 3, X AXIS 


7CAM 0 Y MESSAGE 
:DAC ADDRESS 
CAMERA 0, Y AXIS 


7CAM 1, Y MESSAGE 
;DAC ADDRESS 
CAMERA 1, Y AXIS 


CAM 2, Y MESSAGE 
;DAC ADDRESS 
;CAMERA 2, Y AXIS 


7 CAM fe Y asa 
[DAC ADDRESS 
CAMERA 3 Y AXIS 


AON 


so9vvr9r9v0979 
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TY 
TO D 


013537 
012537 


012777 
3 


020001 
001375 


012777 


052777 


105777 
100375 


012777 
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REPORT THE MESSAGE FIRST 


ADJCAM: MOV (R5)+,RO 
132256 3$: TST @VTCHAR 


3$ 

012000 132254 #12000 ,aVTCXY 

132242 1$: om 

132234 (RO) +, @VTCHAR 
” 


050104 @(R5)+,DACADR 
050112 (R5)+, CAMVAL 


#2315 ,aDACADR 
C,.SAMDAT 


TI 
FI 


PC FIXLIN 
#5463, — 
PC, SAMDAT 
R1,VAL2 
PC,FIXLIN 


PC.CTRLCG 
#°C,.CTRCHA 
2$ 


CTRCHA 
RS 


GET ASCII POINTER 
[WAIT FOR READY 


POSITION THE CAHRACTERS 
sWAIT FOR CHAR. READY 


;LOAD THE CHAR. 
TEST IF TERM. 
BR IF NOT 


SAVE ADDRESS 
SAVE CAMERA DATA 


PRESET DAC TO = GAIN INPUT 


SAVE RESULTS 

POSITION THE CROSS HAIR LINE 
PRESET DAC TO OFFSET 

SAMPLE THE DATA 

SAVE AVERAGE RESULTS 
POSITION THE CROSS HAIR LINE 
PRESET DAC TO + GAIN INPUT 
SAMPLE THE DATA 

SAVE AVERAGE RESULTS 
POSITION THE CROSS HAIR LINE 
TEST FOR CTRL C/G 

CHECK IF CHARACTER WAS A \C\ 
;BR_ IF NOT 


[CLEAR CHAR 
sEXIT 


;COLLECT 64 SAMPLES FROM THE SELECTED CAMERA 


7R1 CONTAINS THE AVERAGE 
1$: 


177700 #-100,awCR 
060000 #BUF 0 ,@BAR 
050112 CAMVAL .@CSRHB 
000002 MTESTZ,@SFR 
000001 #B1T0,aCSR 


132070 : acsR 
2$ 


132070 #CLRALL ,@SFR 
STEMP1 
050102 STEMP2 


004000 
050100 


:CLEAR THE BUFFER 
FINISHED ? 
BR IF NOT 


;LOAD WORD COUNT 
;LOAD ADDRESS 
sSELECT THE CAMERA 
SET TEST 2 ENABLE 
ENABLE NCV11 


WAIT UNTIL DONE 


CLEAR THE DEVICE 


SEQ 0155 





ge°o°0°00°000000009 


2enoe22 


ore: 
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060000 
050113 a i OR Y DATA 


a 
050100 3s: MO (RO) +, STEMP1 THE DAT 
050101 050102 STEMP1+1,STEMP2 =GET HIGH BYTE DATA 
050102 STEMP2,R1 ‘UPDATE AVERAGE 
060200 #BUF 0+200,RO :EINISHED DATA ? 


R1 
#BUFO.RO ‘Test BUF F a POINTER 
3GET 


10$ 

050100 5$: (RO) +, STEMP1 iGET DATA 

050100 050102 

050102 STEMP2,R1 ; UPDATE THE AVERAGE 

060200 sFINISHED DATA ? 

é IF NOT 

sAVERAGE THE DATA 
ZAVERAGE THE DATA 
;AVERAGE THE DATA 
ZAVERAGE THE DATA 
ZAVERAGE THE DATA 
;AVERAGE THE DATA 
sEXIT 

TO y x OR Y CROSSHAIRS 


FIXLIN: ASR 
NOP 
NOP 
NOP 
ADD #100,R1 


MOVB R1,aVIxPOS 
RTS PC 


SUBROUTINE TO io PIXEL DATA 
BISPLY: BIC #400, aVvTCSR 
MOV RO. av IMAP 
1$: S aviCsR 
BPL 1$ 


R1avTPX 
#400, avTcsR 


jf OPTION AREA FLAG 
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C2NCCA.P11 


050112 


050472 


DIAGNOSTIC 


044501 


000116 


MACY11 27(654) 
A TO D FIELD SITE. AND ADJUSTMENT LOOP 


040522 


051525 


052105 
052123 
043040 
043440 


040522 


051525 


052105 
052123 
043040 
043440 


040522 


051525 


052105 
052123 
043040 
043440 


040522 


051525 


052105 


052123 
043040 
043440 


8-AUG-78 


ADMSGO: . 


ADMSG1: 


ADMSG2: . 


ADMSG3: 


15:05 


/ CAMERA 
15,12 
/ADJUST 
15,12 
/ADJUST 
/ CAMERA 
15,12 
/ADJUST 
15,12 
/ADJUST 
/ CAMERA 
15,12 
/ADJUST 
15,12 
/ADJUST 
/ CAMERA 


15,12 
/ADJUST 


15,12 
/ADJUST 


B 13 
PAGE 145 


OF FSET/ 


OFF SET/ 


OFF SET/ 


OFF SET/ 


SEQ 0157 
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040522 ADMSG4: .ASCII /CAMERA 02/ 


-BYTE 15,12 
051525 -ASCII /ADJUST R11 OFF SET/ 


052105 

-BYTE 15,12 
052123 «ASCIZ /ADJUST 
043040 
043440 
040522 ADMSGS: .ASCII /CAMERA 


-BYTE 15,12 
051525 -ASCII /ADJUST OFF SET/ 


052105 

BYTE 15,12 
052123 e-ASCIZ /ADJUST 
043040 
043440 


040522 ADMSG6: .ASCII /CAMERA 


-BYTE 15,12 
051525 eASCII /ADJUST OFF SET/ 
020062 
020130 


052105 

ek Pe 
052123 eASCIZ /ADJUST 
043040 
043440 


040522 ADMSG7: .ASCIi /CAMERA 


-BYTE 15,12 
051525 eASCII /ADJUST OFF SET/ 


052105 

«BYTE 15,12 
052123 eASCIZ /ADJUST 
043040 
043440 


15,12 
042523 7 /THE SELF-TEST CONNECTOR MUST BE INSTALLED ON A0Q17/ 


051072 041505 047524 020122 
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052515 052123 041040 


ore 


030460 


15,12 
051440 \THE SWITCH ON AOQ17 MUST BE IN ‘MAINT."’ POSITION (TOWARD THE I/0 CONNECT 


SULSNEKS 


Cees es eo es Me 2 eo eo ie 2 eo Meo ie 2 ie 2 | 


2.0 
2 
SELF-TEST CONNECTOR MUST BE REMOVED FROM THE A0Q17/ 


"Na 


15,12 
\THE SWITCH ON AO17 MUST BE IN ‘OPER.'' POSITION (AWAY FROM THE 1/0 CONNE 


-BYTE 
PRIM5: .ASCII RAM=PAK CABLE INTO THE SOCKET ON THE AQ17/ 


2 033461 
051540 01 12 15,12 
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051542 2523 020124 040522 -ASCII /SET RAM=PAK SWITCHES TO ‘‘IN'', "NORM’’ AND *‘OFF*’/ 


021040 


15,1 


-BYTE 4 2 
052122 PRIM3: .ASCII /INSERT BLANK ROM INTO ROM BLASTER SOCKET/ 


2 
045516 


047523 


15,12 
042523 \PLEASE DEPRESS THE *'I/0"' AND ‘EXECUTE*’ BUTTONS TOGETHER\ 


042510 


° 15,12 
032040 . \THE 4 PROCESS LEDS WILL LIGHT WHEN DONE CORRECTLY\ 


SE REMOVE RAM-PAK CABLE/ 
041440 


-BYTE 15,12 
044440 -ASCII  / AND INSERT THE BLASTED ROM INTO SOCKET ON AQ17 MODULE/ 


052170. 047515 052504 042514 
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052176 1 O12 «BYTE 15,12 
051505 -ASCII /DEPRESS THE ''CR’’ KEY WHEN READY/ 


"* CABLE MUST BE CONNECTED TO THE AQ17 CONNECTOR/ 


ANNMNMNMNNNMNMNMA |JAMO 


** CABLE MUST BE CONNECTED TO THE M8036 CONNECTOR/ 


052420 015 2 ‘ 75,,12,8 


-E 
052424 015 012 007 FATALO: . 15,12,7 ;''RUNIT’* MUST BE ON A WORD BOUNDRY 
06 . /FATAL BUS TRAP WHEN PERFORMING TEST ‘'/ 


052123 


Seis RUNIT: .ASCIZ /C*’ AT LOCATION /__ ;"'RUNIT’' MUST BE A WORD BOUNDRY 


og egis RUNITA: .ASCIZ <15><12>/PROGRAM RESTART ING/ 7’ RUNIT'' MUST BE A WORD BOUNDRY 
044524 


BYTE 15,12.,7.0 


BYTE 15,12 
eASCIZ /RUNNING WITH / 


eASCIZ / K OF MEMORY/<15><12> 
052572 046505 
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000012 
01 


007 WARNO: .BYTE  15,12,° 
46 -ASCIZ /OCTAL ADDRESS OF TERMINAL = 


000040 
062 KPO: ASCII \RFR/2\ 
060 : "A i \Em50\ 
031457 tian \Di0/37\ 
15,2 

060 .BY 60,60,60,40 
060 : 60,60,60,40 
060 ; 60,60,60,40 
060 : 60,60,60,40 
060 j 60,60,60,40 
060 , 60,60,60,40 
060 . 60,60,60,40 
060 ; 60.60,60,40 
060 ; 60,60,60.40 
060 j 60,60,60,40 
060 , 60,60,60,40 
060 ‘ 60,60,60,40 
060 / 60,60,60,40 
060 ; 60,60,60,40 
060 ; 60,60,60,40 
060 ; 60,60,60,40 
060 ; 60,60,60,40 
060 ; 60,60,60,40 
060 : 60,60,60,40 


NANNNMNNNNNNNNNNNNNYMW AMO 


iF a) 


{NINtTALALNCN(N tA 
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CZNCCA.P11 A TO D FIELD SITE AND ADJUSTMENT LOOP SEQ 0163 
6837 053007 060 066 060 -BYTE  60,60,60,40 
6838 053012 040 
6839 053013 060 060 060 -BYTE  60,60,60,40 
6840 053016 040 
6841 053017 060 060 060 -BYTE  60,60,60,40 
6842 053022 040 
6843 053023 060 060 060 -BYTE  60,60,60,40 
6844 053026 040 
6845 053027 060 060 060 -BYTE  60,60,60,40 
6846 053032 040 
6847 053033 060 060 060 -BYTE  60,60,60,40 
6848 053036 040 
6849 053037 060 060 060 -BYTE  60,60,60,40 
6850 053042 040 
6851 053043 060 060 060 -BYTE  60,60,60,40 
6852 053046 040 
6853 053047 060 060 060 -BYTE  60,60,60,40 
6854 053052 040 
6855 053053 060 060 060 -BYTE  60,60,60,40 
6856 053056 040 
6857 053057 060 060 060 -BYTE  60,60,60,40 
6858 053062 040 
6859 053063 060 060 060 -BYTE  60,60,60,40 
6860 053066 040 
6861 053067 060 060 060 -BYTE  60,60,60,40 
6862 053072 040 
6863 053073 003 000 MVTE 3,0 

053075 103 030115 031457 CMO: eASCII \CM0/37\ 
6865 053102 C67 
6866 053103 015 000 BYTE 15,9 
6867 053105 103 000103 CcO: eASCIZ /CC/ 
6868 053110 043520 027460 033463 PGO: -ASCII \PG0/37\ 
6869 053116 15 000 -BYTE 15,0 
6870 053120 050132 ZP0: eASCII = /ZP/ 
6871 053122 015 000 VTE 3,0 
6872 EVEN 
6873 
6874 ;BUFFER AREA 
6875 
6876 060000 . =60000 
6877 060000 001000 BUFO: .BLKW 512. 
6878 062000 001000 BUF1:  .BLKW 512. 
6879 064000 000240 BUF 2: NOP 


6881 000001 - END 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0164 


= 172760 388 429 547 548 549 556 
1663 6072 


5548 
5972* 6036 6070 
388 43) 541 


403 


542 543 


64074 
1762 1779 1796 1813 


1983 2000 2017 2035 


3279 


587* 683 


pe ee ee ee ee ee ee ee Mee Ree Ree Nee Ree Ree Nees eee Bees ee Does Does ee oes ee 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0165 


562 563 
5822 5922* 5924 5996 


1056* 1141* 1167* 1173 1195* 
1374* 2144 2172* 2207% 
2408* 2610* 2652* 3111* 
3228* 3288* 3359* 3428* 


rnin nnn nnn 
We 2 so 
NOOO eS 2 = oo 
WBWNWOO—NMWEMN 


T 
T 
T 
T: 
T 
T! 
T 
T 
T 
T 
T 
T 
T 
T 
T 
T 
T 
T 
T 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0166 
BIT13 = 020000 
BIT14 = 040000 


BIT15 = 100000 
BIT2 000004 


BITS 000010 
BITS 000020 


68784 


5135 52144 


Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
Ul 
U 
U 
U 
U 
U 
U 
U 
U 
U 
U 
U 
U 
U 
U 





L 13 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG=78 15:05 PAGE 
CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0167 


053105 
104407 
040060 
004000 


5062 


$A 
$A 
$A 
$A 
$A 
$A 
$A 
$8 
$6 


001766 
046140 


046042 
050114 


% 


3207* 3231* 3254* 


DEADKW 00401 





CZNCCA NCV11 
CZNCCA.P11 


033002 
032465 
032500 


032524 


360 
031432 


DIAGNOSTIC MACY11 27(654) 8-AUG-78 
CROSS REFERENCE TABLE 


M 13 
15:05 PAGE 156 


SEQ 0168 


473 
499 


473 
499 


5605*  5610* 5646 


457 459 461 463 465 467 469 471 473 
483 485 487 489 491 493 495 497 499 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0169 


1304 1340 6165 


656* 836 840+ 849 850* 858* 863* 
4247 4663 4668* 4673* 4687* 4692* 4701* 


$6 
$G 
$H 
$H 
$H 


APAAMM 
ear 


5805* 
5011 5012 


eeeeeereeeeeerse Leereses 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0170 


67914 
4679 


3516* 3569*  3635* 


4695 


36404 
001740 859 2389* 2412% 2414 2415 5834* 5856*  5869*  5877* 


001742 5839* 5840*  5846* 5847* 5853* 5854» 
860 2413* 5833* 5841 5848 5855 5868* 


5807 61834 


61144 6142 


7994 3707 
5438 5441 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0171 
LSBTXT 041610 53664 6012* 6013* 6014* 
MMVEC = 000259 1354 4676* 4677* 
MORTST= 000090 5804 877 3975 5023 
M=GK 052565 835 67814 
MSGEM 052545 825 6777# 
MSG2t) 9041175 53134 
NARA 041760 54004  5982* 6040 6057 
NARB 041762 54014 5976* 6044 6058 
NARCNT 046210 6046 62004 
NARMSG 1066 5299# 6061 
NARROW 041756 3480* 3543* 3590*  3656* 3970 53994 
NARTOL 046211 5964 62014 
NLSI11 003354 797# 838* 842% 2673 
NOEXIT 043274 5558* 5625* 5652 5662* 56694 
NOMIAL 041742 53914 5924 
NORCNT 046206 6048 6189 61984 
041754 53984 5986* 6048 6062 

NORMSG 041642 53744 6064 
NORTOL 046207 5962 61994 
NURCNT 046212 6042 62024 

T 6213 5966 62034 
OBSCNT 046214 6038 62044 
OBSTOL 046215 62054 
OF F 001750 5484 852 1039* 1040 1054* 1061 1093* 1095 1375* 1388 2066* 2101 2140 


2171* 2206* 2240* 2280* 2291 2306* 2320 2457% 2495* 2525% 2572% 2612* 2654* 
2701* 2722% 2743% 2764% 2785* 2806* 2827* 2848% 2869* 2890* 2911* 2932*  2956% 
2991% 3012* 3042* 3063* 3089* 3112 3286*  3486*  3535* 3578*  3610*  3644* 5871* 


6115* 
OKMSG 041054 52978 
OUT 041772 3463* 3464 3470 3504* 3505 3515* 3516 3522 3556* 3557 54054 
OQUTCHN 032714 39624 5173* 
OUTRNG 032621 39514 5174 
PASMSG 041702 53804 6050 6078 
PBLAST 043004 741 56094 
PC =%000007 504 806* 813* 3688*  3691* 3701* 3706 4029 4235* 4312 “371% 4338* 4345* 


4359% 4361%* 4469% 4475* 4533* 4574% 4591*% 4670 4719* 4815s “333% 4938* 4973* 
4976* 5025* 5166* 5526% 5533* 5538* 5541* 5550* 5606*  5677* 5679* 5681*  5704* 
5735* 5742* 5785* 5831* 5836*  5843* 5850* 5863* 5923* 5941* 5947* 6009*  6017* 
6088* 6106* 6139* 6142% 6152% 6175* 6337* 63543*% 6349% 6421* 6423* 6425* 6427* 


PGO 053110 5557 5604 5624 68684 
PIRQ = 177772 364 

PIRQVE= 000240 1304 

POTIME 047106 72 63214 

PRIME 046142 61774 

PRIMEO 046144 61784 

PRIME1 046146 5520* 5527* 5799* 5806* 5874 6119 61794 
PRIMO 051046 5506 5798 66164 

PRIM1 052051 5562 67134 

PRIM2 052242 6322 67374 

PRIMS 051622 5609 66844 

PRIMG 052332 804 67484 

PRIMS 051460 5507 66664 


PRIM6 051250 784 66414 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0172 


54934 5618 
534 


runnin ni 


4605* 4620* 4632* 4633+ 
5566 5629 5655 5818 6404 
o2 34, 5559 5599 5601 5603 5611 5613 


5563 


1553 1570 1588 


052474 701 70 13 722 726 729 734 


TA 052514 
=%000000 675 772* 774 777 


58 
6087* 6127* 6131* 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0173 


6193 6336* 6338* 6339 6342* 6344* 6345 6348* 6350* 6351 6407* 6413 6414 
6441% 6443* 6444 6460* 6463 6466 6469 6472 6501 

R1 =%000001 42" 658* 659 660* 667* 668 672* 673 674 776* 777* 779 1259* 
1264 1295* 1300* 1331* 1336* 3278* 3280 3295* 3298* 3351* 3353 3366* tues. 


4801* 4807* 4811 4813* 4845 4850* 4855* 4873* 4876 4880* 4889* 48 4894* 
4915* 4921* 4927* 5159* . 5164* 5184* 5186* 5187 5432 5436* 5573* 5574= 5576* 
5578* 5580* 5582* 5584* -5586*  5588*  5590*  5673* 5674 5676 5678 6 5685 


R2 =%000002 434 668* 669* 670* 671 3279* 3281 3352* 3354 3421* 3423 3471* 3477* 


R3 =%000003 444 3419 3422* 3423 4084 4085* 4086 4089* 4090 4094 4096 4098*  4100* 


RS =%000004 454 4397 4399 4400* 4401* 4402 4403* 4417 4419x 4427 4430* 4610 4627* 
—_—s 4763* 4918* 4921 4927 4929 5181* 5187* 5195* 5196* 5200 5709* 5710* 
R5 =%000005 464 4169 4171*  4173* 4180* 4184* 4199 4205* 4398 4404* 4406* 4408*  4409* 


6378* 6384* 6389* 6394* 6399* 6407 6417 6418 6436* 


R6 =%000006 47# 592s 593* 594 
R7 =%000007 484 

SAMCAM 047276 63614 

SAMDAT 047576 6421 6425 6429 64414 
SAVREG= 104413 491% 50214 

SDPARO= 172260 2234 

SDPAR1= 172262 2244 

SDPAR2= 172264 225a 

SDPAR3= 1722 2264 


172266 
SDPAR4= 172270 227n 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0174 


172272 


855 44 964* 967 977* 980 


3 
5147* 
001770 


043362 56924 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0175 


172240 


626 698 761* 788 833* 865 868 
22 2632 646 2647* 


177572 
177574 


001140 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0176 
SWREG 000176 3004 624 645 3985 3998 
SwO. = 000001 884 

SwOO = 000001 784 88 5032 

SwO1 = 000002 77# 87 5043 

SwO2 = 000004 764 86 

SwO3 = 000010 754 85 

SwO4 = 000020 744 84 

SswOS = 000040 734 83 

SwO6 = 000100 728 82 5027 

SwO7 = 000200 714 81 

SwO8 = 000400 704 80 

SswOo9 = 001000 694 79 

Swi = 2 874 

Sw10 = 002000 684 

SW11 = 004000 674 3328 3400 3502 3554 6082 
SWi2 = 010000 664 

Sw13 = 020000 654 5141 5169 

SW14 = 040000 644 

Sw15 = 100000 634 5175 

SWw2 = 000004 864 5054 

SW3 = 000010 854 5065 

SWw4 = 000020 844 5071 

SWS = 0 834 

SW6 = 000100 824 

SW7 = 000200 814 5038 

Sw8 = 000400 804 5049 

Sw9 = 001 79# 5060 

TBITVE= 000014 1214 

TESTER 902020 304 5844 

TESTZ = 5784 1144 1170 1171 1198 1199 1221 


TFSITE 003276 703 7844 

TIMEO § 041253 53224 5654 

TKVEC = 000060 1284 

TPVEC = 1294 

TRAPVE= 000034 1274 602* 603* 

TRTIVEC= 14 1224 

TSTCON= 000004 577# §=1372 1451 1468 1485 1501 1535 1551 1568 1586 1603 1621 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0177 


TSTDMA= 000010 


29854 


30394 


31074 


31684 
31954 
TST147 025026 32194 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0178 


005052 
02 


3329 3332 33404 
3399 3401 3404 34124 


35104 
35624 





CZNCCA NCV11 
CZNCCA.P11 


013010 


177612 


DIAGNOSTIC MACY11 27(654) 
CROSS REFERENCE TABLE 


18734 


8-AUG-78 


K 14 
15:05 PAGE 167 


SEQ 0179 





en 


CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 
CZNCCA.P11 CROSS REFERENCE TABLE 


177614 


001752 


050110 


001126 


8-AUG-78 


1881* 


L 14 
PAGE 168 


6505* 


1166* 


3427* 
3143 


1194* 


5150* 
3197 


2751* 
28 


SEQ 0180 


1217* 
22398 
3150* 
6116* 


3244 


2772* 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0181 


2035* 2053* 


3319 
3593* 


4555 4579 
4557 


4262* 4284 4457* 4495 
4284 
3970 3973 4464* 4465* 4466 4495 


4488 4495 


4586* 45944 
SFILLS 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0182 


SGDADR 001120 on 
SGDDAT 001124 91 51« 
5 968 5 1022 


030154 mae 


46714 4700* 


4283 
1019* 24912 31462 3173 3275" 3348 4260 


3557 3608 3633 4714" 47218 





—_ * — ee ~ wer ee SS — - . -_ 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0183 
SMSGAD 001210 3964 4563* 4566 
SMSGLG 001212 39784  4568* 
SMSGTY 001174 3904 4561 4569* 4581 4585* 
SMSWR 033536 3997 41104 
SMTYP1 001225 4114 
SMTYP2 001231 4194 
SMTYP3 001235 4228 
SMTYP4 001241 4254 
T 036504 47834 5735 5941 
SMXCNT 034370 4273 42834 
SNULL_ 001154 3748 = =4334 4363 
SNWTST= 000001 8444 8778 8974 9104 9234 9424 9594 9728 9844 9964 10134 10304 10474 


SOCNT 035076 4395* 4424% 44374 
SOMOD 


— 035100 4390* 4394* 4399 4402* 4413* 44394 
SOVER 034354 4237 4253 4261 4271 42804 bs 
SPASS 001202 3934 628* 800 3326 3398 3500 3552 3686*  3687* 3695 3708 4267 4284 
SPASTM 001006 33 
SPOWER 036052 4635 46404 
SPWRDN 035704 604 46044 4632 
036040 46354 
SPWRUP 035756 4614 46204 
SQUES 001170 38° 4 755 4043 4092 4108 4363 4495 
$RDCHR 033266 40564 5018 
SRDDEC= ***e%% 5021 
$RDLIN 033406 40844 5019 
$RDOCT 033560 41244 5020 
- 10 40774 
SRESRE 036446 4757# 5022 
SRTNAD 030176 37074 
$SR2A = *eeeee 5023 
SSAVRE 036410 47414 5021 
SSAVR6 036050 4613* 4621 4622* 4623* 46394 
$SB2D 037232 49714 6009 
$SCOPE 034106 598 42334 
$SETUP= 000137 5824 597 598 600 602 604 606 607 608 610 637 640 3684 
3980 4114 4234 4456 4482 4490 
$SIZE 036062 806 1 46594 
SSIZEX 340 4699 47094 
STUP = 177777 5824 
$SVLAD 034320 4245 42744 
$SVPC = 000106 3124 317 
$SWR = 167400 44 21 285 286 287 288 289 290 291 378 379 380 607 
608 610 611 848 881 901 914 927 946 96 976 98& 1 
1017 1034 1051 1090 1103 1137 1163 1191 1 1232 1248 1283 1320 
1370 1396 1419 1449 1466 1483 1499 15 1533 1549 1566 1584 1601 
1619 1636 1653 1670 1687 1704 172 173 1755 1772 1789 1806 1823 








CZNCCA NCV11 
CZNCCA.P11 


091216 
= 690000 
02004 
050100 


001160 


$TKB 001146 
$TKS 001144 
$™N = 000162 


DIAGNOSTIC MACY11 27(654) 
CROSS REFERENCE TABLE 


8-AUG~78 


15:05 


C 15 
PAGE 


34134 


34584 


SEQ 0184 





CZNCCA NCV11 
CZNCCA.P11 


037146 


wveeekenee 


= 001000 


DIAGNOSTIC MACY11 27(654) 
CROSS REFERENCE TABLE 


35114 


8-AUG-78 
3553 
3663 
5432* 
5428 


50124 


4252 
41074 


5009 
4345 


44384 
312 
611 

45424 


D 15 
15:05 PAGE 173 


3555 3559 35634 
3665 36694 


5455* 


50134 50144 5015 


4274* 4275 4280 


3134 3154 3174 
3708 3712 39644 
45954 4616 4638 


36024 


50194 


324 
41074 
49594 63184 


50204 


68774 


SEQ 0185 
3622 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0186 


COMME N 
ENDCOM 
ERROR 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0187 


$S$SET 
$S$SETM 
$$SKIP 
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DIAGNO 
CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0188 


4724 


4284 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0189 





CZNCCA NCV11 
CZNCCA.P11 


DIAGNOSTIC MACY11 27(654) 
CROSS REFERENCE TABLE 


8-AUG-78 


15:05 


3648 
5875 


I 15 
PAGE 


3652 
5876 


3296 


SEQ 0190 
4675 
6759 


4236 
5071 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0191 


oO 
= 
e) 


77 
22 
0 


. 2) 
SOOM VMNNWO0 mw 
SSSESNENRGarU 
WO WOLWUND 


— = es = os =) 3 ts 3 SS 
ee ed ed ed od td od = 3) =) 3 3) 
o—-—-~w 


AMOLOLOA- nf ouw 
OLN ANHLOMW NO 
me ed ed ed ad od od od os) = 
MUS SWANN HS OO 
AWOLOLfO— foun 
WWA ONDA -OONMWN 
me ee ee ee eed ed ed etd 
Re NIN SS SSS 
mee ee ee ee eed aed od oJ od od 
VIN & & SWANN HH OOO 
WWOMOU NS WL OD 
PNA MH HAH WOWNU 
eee eed ed ed etd 3 od 
DWLOHAMVAM OUI 
MNOOAOWOOWNSLO 
ee ed ed od od td 
MMW LS BWW eS 


COW 
co 





K 15 
CZNCCA NCV11 DIAGNOSTIC MACY11 27(654) 8=AUG=78 15:05 PAGE 
CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0192 


16 
16 
17 
17 
17 
18 
18 
19 
19 


Me NMAOLOW- 
wo SAO FAaO0O 
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T 
CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0193 
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CZNCCA.P11 CROSS REFERENCE TABLE SEQ 0194 


4 
9 
016 
064 


4 Hs > 
Se oa 
_— nO 
NN®OSWUW 


be ee ss ss — SS 
~~ 2 YY YH SY SY 
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CZ2NCCA.P11 CROSS REFERENCE TABLE SEQ 0195 


at 
aan™~N au 
RS YASESR= 
AnN-NMANOOM 
WOON NNVOOWW 
NN OWOW HOw 
NSNONENN 


a 
w 
N 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Youre 
— ~~ Wow 
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CZNCCA NCV11 
CZNCCA.P11 


DIAGNOSTIC MACY11 27(654) 
CROSS REFERENCE TABLE 


986 988 989 
1030 1032 1034 1035 
10 1090 1091 1096 
1150 1152 1157 1159 
1208 1210 1212 1214 
1270 1277 1279 128% 
1368 1370 1371 1383 
1435 1442 1445 1447 
1484 1493 1495 1497 
1534 1543 1545 1547 
1585 1594 1597 1599 
1637 1646 1649 1651 
1688 1697 1700 1702 
1739 1748 1751 1753 
1790 1799 1802 1804 
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ERRORS DETECTED: 
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*CZNCCA,CZNCCA/CRF /SOL=CZNCCA 
RUN-TIME: 43 31 6 SECONDS 
CORE USED: 30K 





